# HG changeset patch
# User Stefan Monnier <monnier@iro.umontreal.ca>
# Date 1185895696 0
# Node ID 3386631a602c1812524bb3f4de58b5f92e9b551b
# Parent  53ed644d1a8811d1ddfe9fd91239f8c10f94824c
(vc-find-file-hook): Failsafe if the backend's `registered' function burps.

diff -r 53ed644d1a88 -r 3386631a602c lisp/ChangeLog
--- a/lisp/ChangeLog	Tue Jul 31 15:26:05 2007 +0000
+++ b/lisp/ChangeLog	Tue Jul 31 15:28:16 2007 +0000
@@ -3,6 +3,7 @@
 	* vc-bzr.el: New file (copied from the trunk).
 
 	* vc-hooks.el (vc-handled-backends): Add BZR.
+	(vc-find-file-hook): Failsafe if the backend's `registered' function burps.
 
 	* server.el (server-window): Add switch-to-buffer-other-frame option.
 
diff -r 53ed644d1a88 -r 3386631a602c lisp/vc-hooks.el
--- a/lisp/vc-hooks.el	Tue Jul 31 15:26:05 2007 +0000
+++ b/lisp/vc-hooks.el	Tue Jul 31 15:28:16 2007 +0000
@@ -787,7 +787,7 @@
   (when buffer-file-name
     (vc-file-clearprops buffer-file-name)
     (cond
-     ((vc-backend buffer-file-name)
+     ((ignore-errors (vc-backend buffer-file-name))
       ;; Compute the state and put it in the modeline.
       (vc-mode-line buffer-file-name)
       (unless vc-make-backup-files