From: Mark Wooding <mdw@distorted.org.uk>
Date: Fri, 4 Apr 2008 20:26:26 +0000 (+0100)
Subject: dot-emacs: Fix mdw-check-autorevert.
X-Git-Url: https://git.distorted.org.uk/~mdw/profile/commitdiff_plain/46e69f55a4ca0035cdbfd8e546d32be18a3b4b5c?ds=sidebyside;hp=8d6d55b983fb1c1f4cc870195e016380d10fc8dc

dot-emacs: Fix mdw-check-autorevert.

Only mess with auto-revert if it's actually there.  Similarly, only mess
with Tramp if that's there.
---

diff --git a/dot-emacs.el b/dot-emacs.el
index 3da4450..03923da 100644
--- a/dot-emacs.el
+++ b/dot-emacs.el
@@ -302,7 +302,10 @@ input lists are not modified, although they'll probably become garbage."
   "Sets global-auto-revert-ignore-buffer appropriately for this buffer,
 taking into consideration whether it's been found using tramp, which seems to
 get itself into a twist."
-  (cond ((and (buffer-file-name)
+  (cond ((not (boundp 'global-auto-revert-ignore-buffer))
+	 nil)
+	((and (buffer-file-name)
+	      (fboundp 'tramp-tramp-file-p)
 	      (tramp-tramp-file-p (buffer-file-name)))
 	 (unless global-auto-revert-ignore-buffer
 	   (setq global-auto-revert-ignore-buffer 'tramp)))