# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 774657006 0
# Node ID f95e050e272f116e69ed060cef82d0e5d05bf746
# Parent  e6f91355333e6eb195081d271e59c878e08bca25
At compile time, require dired.
(vc-finish-logentry): Use the proper files buffer for vc-buffer-sync.

diff -r e6f91355333e -r f95e050e272f lisp/vc.el
--- a/lisp/vc.el	Tue Jul 19 22:16:18 1994 +0000
+++ b/lisp/vc.el	Tue Jul 19 22:30:06 1994 +0000
@@ -61,6 +61,7 @@
 
 (require 'vc-hooks)
 (require 'ring)
+(eval-when-compile (require 'dired))	; for dired-map-over-marks macro
 
 (if (not (assoc 'vc-parent-buffer minor-mode-alist))
     (setq minor-mode-alist
@@ -676,8 +677,11 @@
 	))
   ;; Sync parent buffer in case the user modified it while editing the comment.
   (save-excursion
-    (set-buffer vc-parent-buffer)
-    (vc-buffer-sync))
+    (let ((buffer (get-file-buffer vc-log-file)))
+      (if buffer
+	  (progn
+	    (set-buffer buffer)
+	    (vc-buffer-sync)))))
   ;; OK, do it to it
   (if vc-log-operation
       (save-excursion