(vc-menu-map-filter): Use vc-call and reindent.
This commit is contained in:
parent
dc172b7323
commit
98481bad3b
1 changed files with 3 additions and 3 deletions
|
|
@ -964,14 +964,14 @@ Used in `find-file-not-found-functions'."
|
|||
(if (and (symbolp orig-binding) (fboundp orig-binding))
|
||||
(setq orig-binding (indirect-function orig-binding)))
|
||||
(let ((ext-binding
|
||||
(if vc-mode (vc-call-backend (vc-backend buffer-file-name) 'extra-menu))))
|
||||
(if vc-mode (vc-call extra-menu buffer-file-name))))
|
||||
;; Give the VC backend a chance to add menu entries
|
||||
;; specific for that backend.
|
||||
(if (null ext-binding)
|
||||
orig-binding
|
||||
orig-binding
|
||||
(append orig-binding
|
||||
'((ext-menu-separator "---"))
|
||||
ext-binding))))
|
||||
ext-binding))))
|
||||
|
||||
(defun vc-default-extra-menu (backend)
|
||||
nil)
|
||||
|
|
|
|||
Loading…
Add table
Reference in a new issue