martin/emacs
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

vc-finish-logentry: Don't run vc-finish-logentry-hook

Browse Source 
* lisp/vc/vc-dispatcher.el (vc-finish-logentry): Don't run
undocumented, undeclared 'vc-finish-logentry-hook'.  There is
already 'vc-log-after-operation-hook'; it is not clear we need
both.
This commit is contained in:
Sean Whitton
2025-05-30 13:21:07 +01:00
parent f699b6e4f4
commit c459ba692e
1 changed files with 7 additions and 11 deletions
Download Patch File Download Diff File Expand all files Collapse all files

18
lisp/vc/vc-dispatcher.el
View File

@@ -874,19 +874,15 @@ the buffer contents as a comment."
(setq vc-log-operation nil)
;; Quit windows on logbuf.
(cond
((not logbuf))
(vc-delete-logbuf-window
(quit-windows-on logbuf t (selected-frame)))
(t
(quit-windows-on logbuf nil 0)))
(cond ((not logbuf))
(vc-delete-logbuf-window
(quit-windows-on logbuf t (selected-frame)))
(t
(quit-windows-on logbuf nil 0)))
;; Now make sure we see the expanded headers
(when log-fileset
(mapc
(lambda (file) (vc-resynch-buffer file t t))
log-fileset))
(run-hooks after-hook 'vc-finish-logentry-hook)))
(mapc (lambda (file) (vc-resynch-buffer file t t)) log-fileset)
(run-hooks after-hook)))
(defun vc-dispatcher-browsing ()
"Are we in a directory browser buffer?"