summaryrefslogtreecommitdiff
path: root/lisp/vc-dispatcher.el
diff options
context:
space:
mode:
authorDan Nicolaescu <dann@ics.uci.edu>2009-08-07 08:24:29 +0000
committerDan Nicolaescu <dann@ics.uci.edu>2009-08-07 08:24:29 +0000
commit3c53763cf24f7e7507fd3a941761aae836c0075e (patch)
treea9075d0eb7893deb0664f76d698a2df9ee6c54de /lisp/vc-dispatcher.el
parent3bca7ca557f99e07c117874a2802e2d2434571a4 (diff)
downloademacs-3c53763cf24f7e7507fd3a941761aae836c0075e.tar.gz
(vc-resynch-window): Update comment.
Diffstat (limited to 'lisp/vc-dispatcher.el')
-rw-r--r--lisp/vc-dispatcher.el8
1 files changed, 5 insertions, 3 deletions
diff --git a/lisp/vc-dispatcher.el b/lisp/vc-dispatcher.el
index f03f16ede98..a209e139bc2 100644
--- a/lisp/vc-dispatcher.el
+++ b/lisp/vc-dispatcher.el
@@ -462,9 +462,10 @@ editing!"
(if keep
(progn
(vc-revert-buffer-internal t noquery)
- ;; TODO: Adjusting view mode might no longer be necessary
- ;; after RMS change to files.el of 1999-08-08. Investigate
- ;; this when we install the new VC.
+
+ ;; VC operations might toggle the read-only state. In
+ ;; that case we need to adjust the `view-mode' status
+ ;; when `view-read-only' is non-nil.
(and view-read-only
(if (file-writable-p file)
(and view-mode
@@ -473,6 +474,7 @@ editing!"
(and (not view-mode)
(not (eq (get major-mode 'mode-class) 'special))
(view-mode-enter))))
+
(run-hook-with-args 'mode-line-hook buffer-file-name))
(kill-buffer (current-buffer)))))