jt/emacs-prelude
1
0
Fork 0
Code Issues Pull requests Actions Packages Projects Releases Wiki Activity

Change how the "re-open file as root" functionality works

Browse source 
Fixes #850

Use find-file-hook instead of advising ido-find-file.
This commit is contained in:
Geoff Shannon 2015-05-16 11:43:47 -05:00
parent 61d45f8e6e
commit cd9ea1edee
1 changed files with 2 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
core/prelude-core.el
View file

@ -302,13 +302,14 @@ buffer is not visiting a file."
(ido-read-file-name "Find file(as root): "))) (ido-read-file-name "Find file(as root): ")))
(prelude-find-alternate-file-as-root buffer-file-name))) (prelude-find-alternate-file-as-root buffer-file-name)))
(defadvice ido-find-file (after find-file-sudo activate) (defun prelude-reopen-as-root ()
"Find file as root if necessary." "Find file as root if necessary."
(unless (or (tramp-tramp-file-p buffer-file-name) (unless (or (tramp-tramp-file-p buffer-file-name)
(equal major-mode 'dired-mode) (equal major-mode 'dired-mode)
(not (file-exists-p (file-name-directory buffer-file-name))) (not (file-exists-p (file-name-directory buffer-file-name)))
(file-writable-p buffer-file-name)) (file-writable-p buffer-file-name))
(prelude-find-alternate-file-as-root buffer-file-name))) (prelude-find-alternate-file-as-root buffer-file-name)))
(add-hook 'find-file-hook 'prelude-reopen-as-root)
(defun prelude-start-or-switch-to (function buffer-name) (defun prelude-start-or-switch-to (function buffer-name)
"Invoke FUNCTION if there is no buffer with BUFFER-NAME. "Invoke FUNCTION if there is no buffer with BUFFER-NAME.