[Emacs-diffs] Changes to emacs/lisp/vc-hooks.el,v

[Michael Albinus]

CVSROOT:        /sources/emacs
Module name:    emacs
Changes by:     Michael Albinus <albinus>       08/09/29 18:57:09

Index: vc-hooks.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/vc-hooks.el,v
retrieving revision 1.265
retrieving revision 1.266
diff -u -b -r1.265 -r1.266
--- vc-hooks.el 7 Sep 2008 20:24:28 -0000       1.265
+++ vc-hooks.el 29 Sep 2008 18:57:08 -0000      1.266
@@ -238,7 +238,10 @@
 
 (defun vc-file-clearprops (file)
   "Clear all VC properties of FILE."
-  (setplist (intern file vc-file-prop-obarray) nil))
+  ;; Sometimes, Tramp runs into trouble, FILE is nil then.  We shall
+  ;; avoid an error in this case.
+  (when (stringp file)
+    (setplist (intern file vc-file-prop-obarray) nil)))
 
 
 ;; We keep properties on each symbol naming a backend as follows: