Github/emacs
2
0
Fork 1
mirror of git://git.sv.gnu.org/emacs.git synced 2026-06-14 12:31:25 +00:00
Code Issues Projects Releases Packages Wiki Activity

; Relocate comment along with the relocated code.

Browse source 
The code was moved, but without its comment, in this change:

    Author:     Dmitry Gutov <dgutov@yandex.ru>
    AuthorDate: Thu May 28 02:16:00 2015 +0300

        Delete the old process in vc-setup-buffer

        * lisp/vc/vc-dispatcher.el (vc-setup-buffer): Delete the old
        process here.
        (vc-do-command): Rather than here (bug#20608).
This commit is contained in:
Sean Whitton 2026-02-28 21:16:49 +00:00
parent d78a1db462
commit b7dedde7aa
1 changed files with 1 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
lisp/vc/vc-dispatcher.el
View file

@ -188,6 +188,7 @@ Another is that undo information is not kept."
(olddir default-directory)
(buf (get-buffer-create buf)))
(set-buffer buf)
;; If there's some previous async process still running, just kill it.
(let ((oldproc (get-buffer-process (current-buffer))))
;; If we wanted to wait for oldproc to finish before doing
;; something, we'd have used vc-eval-after.
@ -488,8 +489,6 @@ that is inserted into the command line before the filename."
(squeezed (remq nil flags))
(inhibit-read-only t)
(status 0))
;; If there's some previous async process still running,
;; just kill it.
(when files
(setq squeezed (nconc squeezed files)))
(let (;; Since some functions need to parse the output