* lisp/vc/log-view.el (log-view-mode-menu): Quote derived modes (bug#66686).
This commit is contained in:
@@ -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'.")
|
||||||
|
|||||||
Reference in New Issue
Block a user