Mercurial > emacs
comparison lisp/vc.el @ 12393:7d4615a12286
(vc-start-entry): Prevent lossage when doing a mass checkin from
a VC-dired buffer (Andre Spiegel's code change was slightly wrong).
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Mon, 26 Jun 1995 23:42:30 +0000 |
| parents | 8fecaa78ac4b |
| children | 844b502ac6d0 |
comparison
equal
deleted
inserted
replaced
| 12392:76541e773672 | 12393:7d4615a12286 |
|---|---|
| 704 (set-buffer (get-buffer-create "*VC-log*")) | 704 (set-buffer (get-buffer-create "*VC-log*")) |
| 705 (pop-to-buffer (get-buffer-create "*VC-log*"))) | 705 (pop-to-buffer (get-buffer-create "*VC-log*"))) |
| 706 (set (make-local-variable 'vc-parent-buffer) parent) | 706 (set (make-local-variable 'vc-parent-buffer) parent) |
| 707 (set (make-local-variable 'vc-parent-buffer-name) | 707 (set (make-local-variable 'vc-parent-buffer-name) |
| 708 (concat " from " (buffer-name vc-parent-buffer))) | 708 (concat " from " (buffer-name vc-parent-buffer))) |
| 709 (vc-mode-line (or file " (no file)")) | 709 (if file (vc-mode-line file)) |
| 710 (vc-log-mode) | 710 (vc-log-mode) |
| 711 (make-local-variable 'vc-log-after-operation-hook) | 711 (make-local-variable 'vc-log-after-operation-hook) |
| 712 (if after-hook | 712 (if after-hook |
| 713 (setq vc-log-after-operation-hook after-hook)) | 713 (setq vc-log-after-operation-hook after-hook)) |
| 714 (setq vc-log-operation action) | 714 (setq vc-log-operation action) |