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

Merge branch 'master' of github.com:bbatsov/prelude

Browse source 
# Please enter a commit message to explain why this merge is necessary,
# especially if it merges an updated upstream into a topic branch.
#
# Lines starting with '#' will be ignored, and an empty message aborts
# the commit.
This commit is contained in:
Bozhidar Batsov 2013-04-29 08:00:29 +03:00
parent 9fbef947b5 7181dbb5b5
commit 4c1b6b9dea
1 changed files with 3 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
core/prelude-core.el
View file

@ -264,8 +264,9 @@ buffer is not visiting a file."
(defadvice ido-find-file (after find-file-sudo activate) (defadvice ido-find-file (after find-file-sudo activate)
"Find file as root if necessary." "Find file as root if necessary."
(unless (and buffer-file-name (unless (or (equal major-mode 'dired-mode)
(file-writable-p buffer-file-name)) (and (buffer-file-name)
(file-writable-p buffer-file-name)))
(find-alternate-file (concat "/sudo:root@localhost:" buffer-file-name)))) (find-alternate-file (concat "/sudo:root@localhost:" buffer-file-name))))
(defun prelude-start-or-switch-to (function buffer-name) (defun prelude-start-or-switch-to (function buffer-name)