diff options
Diffstat (limited to 'lisp/vc/vc.el')
| -rw-r--r-- | lisp/vc/vc.el | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/vc/vc.el b/lisp/vc/vc.el index 7152b51eff6..2a09d70209d 100644 --- a/lisp/vc/vc.el +++ b/lisp/vc/vc.el @@ -1696,7 +1696,7 @@ Runs the normal hooks `vc-before-checkin-hook' and `vc-checkin-hook'." (progn (dolist (f files) (with-current-buffer (find-file-noselect f) - (vc-revert-file f))) + (vc-revert-file buffer-file-name))) (with-temp-buffer ;; Trying to support CVS too. Assuming that vc-diff ;; there will usually the diff root in default-directory. @@ -1724,8 +1724,8 @@ Runs the normal hooks `vc-before-checkin-hook' and `vc-checkin-hook'." (expand-file-name f) t) (with-current-buffer (get-file-buffer f) - (revert-buffer t t t)) - (delete-directory tmpdir t))))) + (revert-buffer t t t))) + (delete-directory tmpdir t)))) ;;; Additional entry points for examining version histories |