(vc-find-file-hook): Use with-demoted-errors.

fc8b8d0f · Stefan Monnier · be436d23 · fc8b8d0f · fc8b8d0f
Commit fc8b8d0f authored Jul 13, 2007 by Stefan Monnier
Hide whitespace changes
Inline Side-by-side

Showing with 5 additions and 1 deletion

lisp/ChangeLog lisp/ChangeLog +4 -0

lisp/vc-hooks.el lisp/vc-hooks.el +1 -1

No files found.
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
+2007-07-13  Stefan Monnier  <monnier@iro.umontreal.ca>
+
+	* vc-hooks.el (vc-find-file-hook): Use with-demoted-errors.
+
 2007-07-12  Davis Herring  <herring@lanl.gov>

 	* desktop.el (desktop-buffer-info, desktop-save):

--- a/lisp/vc-hooks.el
+++ b/lisp/vc-hooks.el
@@ -793,7 +793,7 @@ current, and kill the buffer that visits the link."
  (when buffer-file-name
    (vc-file-clearprops buffer-file-name)
    (cond
-     ((vc-backend buffer-file-name)
+     ((with-demoted-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