summary refs log tree commit diff stats
diff options
context:
space:
mode:
-rw-r--r--init.el17
1 files changed, 17 insertions, 0 deletions
diff --git a/init.el b/init.el index a633387..7fee7a3 100644 --- a/init.el +++ b/init.el
@@ -1253,6 +1253,23 @@ specific to most general, they are these:
1253 "C-M-\\" #'crux-cleanup-buffer-or-region 1253 "C-M-\\" #'crux-cleanup-buffer-or-region
1254 "C-x 4 t" #'crux-transpose-windows) 1254 "C-x 4 t" #'crux-transpose-windows)
1255 1255
1256 (el-patch-feature crux)
1257 (with-eval-after-load 'crux
1258 (el-patch-defun crux-reopen-as-root ()
1259 "Find file as root if necessary.
1260
1261Meant to be used as `find-file-hook'.
1262See also `crux-reopen-as-root-mode'."
1263 (unless (or
1264 ;; This helps fix for `nov-mode', and possibly others.
1265 (el-patch-add (null buffer-file-name))
1266 (tramp-tramp-file-p buffer-file-name)
1267 (equal major-mode 'dired-mode)
1268 (not (file-exists-p (file-name-directory buffer-file-name)))
1269 (file-writable-p buffer-file-name)
1270 (crux-file-owned-by-user-p buffer-file-name))
1271 (crux-find-alternate-file-as-root buffer-file-name))))
1272
1256 (crux-reopen-as-root-mode +1)) 1273 (crux-reopen-as-root-mode +1))
1257 1274
1258;; (setup (:straight-when 1275;; (setup (:straight-when