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

[Stefan Monnier]

CVSROOT:        /sources/emacs
Module name:    emacs
Changes by:     Stefan Monnier <monnier>        08/03/27 15:00:35

Index: vc-hooks.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/vc-hooks.el,v
retrieving revision 1.231
retrieving revision 1.232
diff -u -b -r1.231 -r1.232
--- vc-hooks.el 26 Mar 2008 04:46:41 -0000      1.231
+++ vc-hooks.el 27 Mar 2008 15:00:32 -0000      1.232
@@ -750,11 +750,12 @@
   ;; and version backups should be made, copy the file to
   ;; another name.  This enables local diffs and local reverting.
   (let ((file buffer-file-name))
+    (ignore-errors               ;Be careful not to prevent saving the file.
     (and (vc-backend file)
         (vc-up-to-date-p file)
         (eq (vc-checkout-model file) 'implicit)
         (vc-call make-version-backups-p file)
-         (vc-make-version-backup file))))
+           (vc-make-version-backup file)))))
 
 (declare-function vc-dired-resynch-file "vc" (file))