From 9383d7d979ab0f0cbf96a1522e3fb15d1ecc8b56 Mon Sep 17 00:00:00 2001 From: Kyle Meyer Date: Thu, 1 Dec 2016 23:59:21 -0500 Subject: Remove find-file-as-root command helm-find-files has an action for this. --- init.el | 1 - lisp/km-files.el | 10 ---------- 2 files changed, 11 deletions(-) diff --git a/init.el b/init.el index 1a841c0..1743f67 100644 --- a/init.el +++ b/init.el @@ -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 () -- cgit v1.2.3