From 4c4ae9fbc209ce7c3b681f00b52cd24ed9407efa Mon Sep 17 00:00:00 2001
From: Alan Pearce
Date: Tue, 24 Nov 2015 17:25:28 +0100
Subject: Emacs: Fix spurious sudo prompts

---
 tag-emacs/emacs.d/init.org | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/tag-emacs/emacs.d/init.org b/tag-emacs/emacs.d/init.org
index dce9a2f3..5623b994 100644
--- a/tag-emacs/emacs.d/init.org
+++ b/tag-emacs/emacs.d/init.org
@@ -1226,8 +1226,9 @@ replace helm and ido.
     :config (progn
               (defadvice counsel-find-file (after find-file-sudo activate)
                 "Find file as root if necessary."
-                (unless (and buffer-file-name
-                             (file-writable-p buffer-file-name))
+                (when (and buffer-file-name
+                           (not (file-writable-p buffer-file-name)))
+                  (message "File not writable %s" buffer-file-name)
                   (find-alternate-file (concat "/sudo::" buffer-file-name))))
               (defun counsel-switch-to-projectile-buffer (arg)
                 "Forward to `projectile-switch-to-buffer'."
-- 
cgit 1.4.1