doom/sudo-find-file: don't sudo writeable files

This commit is contained in:
Henrik Lissner 2018-09-01 00:02:39 +02:00
parent d72f485a97
commit 708ad138c8
No known key found for this signature in database
GPG key ID: 5F6C0EA160557395

View file

@ -5,11 +5,11 @@
"Open FILE as root." "Open FILE as root."
(interactive (interactive
(list (read-file-name "Open as root: "))) (list (read-file-name "Open as root: ")))
(find-file (if (file-writable-p file) (when (file-writable-p file)
file (user-error "File is user writeable, aborting sudo"))
(if (file-remote-p file) (find-file (if (file-remote-p file)
(concat "/" (file-remote-p file 'method) ":" (file-remote-p file 'user) "@" (file-remote-p file 'host) "|sudo:root@" (file-remote-p file 'host) ":" (file-remote-p file 'localname)) (concat "/" (file-remote-p file 'method) ":" (file-remote-p file 'user) "@" (file-remote-p file 'host) "|sudo:root@" (file-remote-p file 'host) ":" (file-remote-p file 'localname))
(concat "/sudo:root@localhost:" file))))) (concat "/sudo:root@localhost:" file))))
;;;###autoload ;;;###autoload
(defun doom/sudo-this-file () (defun doom/sudo-this-file ()