awesome-emacs/doomemacs
1
0
Fork 0
mirror of https://github.com/doomemacs/doomemacs synced 2025-08-03 12:27:26 -05:00
Code Issues Packages Projects Releases Wiki Activity

Add doom/sudo-find-file

Browse Source
This commit is contained in:
Henrik Lissner
2017-04-26 15:25:24 -04:00
parent 0bc1939ae5
commit b425f45875
1 changed files with 8 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
core/autoload/editor.el
View File

@ -1,5 +1,13 @@
;;; editor.el ;;; editor.el
;;;###autoload
(defun doom/sudo-find-file ()
"Open a file as root."
(interactive)
(let ((file (read-file-name "Open as root: ")))
(unless (file-writable-p file)
(find-file (concat "/sudo:root@localhost:" file)))))
(defun doom--goto-first-non-blank () (defun doom--goto-first-non-blank ()
(beginning-of-visual-line) (beginning-of-visual-line)
(skip-chars-forward " \t\r")) (skip-chars-forward " \t\r"))