diff options
| author | Paul Eggert | 1994-01-03 20:53:26 +0000 |
|---|---|---|
| committer | Paul Eggert | 1994-01-03 20:53:26 +0000 |
| commit | b2396d1f39fc4fa43a21893d050b7013e619d91e (patch) | |
| tree | aeeed5d8afad3814bc6caae7ae8b681ea3f346b4 | |
| parent | 2e0b53ad3d326c42ec059ac2411ebd083fe66b60 (diff) | |
| download | emacs-b2396d1f39fc4fa43a21893d050b7013e619d91e.tar.gz emacs-b2396d1f39fc4fa43a21893d050b7013e619d91e.zip | |
(vc-finish-logentry): Sync the buffer in case the user modified it while
editing the comment.
| -rw-r--r-- | lisp/vc.el | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/lisp/vc.el b/lisp/vc.el index c469c7ca189..3439b354b24 100644 --- a/lisp/vc.el +++ b/lisp/vc.el | |||
| @@ -668,6 +668,10 @@ If nil, uses `change-log-default-name'." | |||
| 668 | (setq vc-comment-ring (make-ring vc-maximum-comment-ring-size))) | 668 | (setq vc-comment-ring (make-ring vc-maximum-comment-ring-size))) |
| 669 | (ring-insert vc-comment-ring (buffer-string)) | 669 | (ring-insert vc-comment-ring (buffer-string)) |
| 670 | )) | 670 | )) |
| 671 | ;; Sync parent buffer in case the user modified it while editing the comment. | ||
| 672 | (save-excursion | ||
| 673 | (set-buffer vc-parent-buffer) | ||
| 674 | (vc-buffer-sync)) | ||
| 671 | ;; OK, do it to it | 675 | ;; OK, do it to it |
| 672 | (if vc-log-operation | 676 | (if vc-log-operation |
| 673 | (save-excursion | 677 | (save-excursion |