diff options
| -rw-r--r-- | init.el | 1 | ||||
| -rw-r--r-- | lisp/km-files.el | 10 |
2 files changed, 0 insertions, 11 deletions
@@ -659,7 +659,6 @@ (bind-keys :map km/file-map ("j" . km/dired-jump-file-at-point) ("n" . km/rename-current-buffer-file) - ("R" . km/find-file-as-root) ("t" . km/touch-buffer-file)) (bind-keys :map ctl-x-4-map ("r" . km/recentf-find-file-other-window) diff --git a/lisp/km-files.el b/lisp/km-files.el index 8c1f679..f342191 100644 --- a/lisp/km-files.el +++ b/lisp/km-files.el @@ -51,16 +51,6 @@ (delete-file (buffer-file-name)) (kill-this-buffer))) -;; http://emacs-fu.blogspot.com/2013/03/editing-with-root-privileges-once-more.html -;;;###autoload -(defun km/find-file-as-root () - "Automatically edit file with root-privileges." - (interactive) - (let ((file (read-file-name "Edit as root: "))) - (unless (file-writable-p file) - (setq file (concat "/sudo:root@localhost:" file))) - (find-file file))) - (declare-function dired-jump (&optional other-window file-name)) ;;;###autoload (defun km/dired-jump-file-at-point () |