* lisp/vc/log-view.el (log-view-mode-menu): Quote derived modes (bug#66686).

This commit is contained in:
Juri Linkov 2023-10-22 20:59:52 +03:00
parent 5d1e6f759f
commit 380f8574ef

View file

@ -163,14 +163,14 @@
:help "Go to the previous count'th log message"] :help "Go to the previous count'th log message"]
["Next File" log-view-file-next ["Next File" log-view-file-next
:help "Go to the next count'th file" :help "Go to the next count'th file"
:active (derived-mode-p vc-cvs-log-view-mode :active (derived-mode-p 'vc-cvs-log-view-mode
vc-rcs-log-view-mode 'vc-rcs-log-view-mode
vc-sccs-log-view-mode)] 'vc-sccs-log-view-mode)]
["Previous File" log-view-file-prev ["Previous File" log-view-file-prev
:help "Go to the previous count'th file" :help "Go to the previous count'th file"
:active (derived-mode-p vc-cvs-log-view-mode :active (derived-mode-p 'vc-cvs-log-view-mode
vc-rcs-log-view-mode 'vc-rcs-log-view-mode
vc-sccs-log-view-mode)])) 'vc-sccs-log-view-mode)]))
(defvar log-view-mode-hook nil (defvar log-view-mode-hook nil
"Hook run at the end of `log-view-mode'.") "Hook run at the end of `log-view-mode'.")