Remove some Emacs 20 compat code from speedbar.el
* lisp/speedbar.el (speedbar-easymenu-definition-trailer): Remove Emacs 20 compat code.
This commit is contained in:
@@ -899,12 +899,9 @@ This basically creates a sparse keymap, and makes its parent be
|
||||
"Additional menu items while in file-mode.")
|
||||
|
||||
(defvar speedbar-easymenu-definition-trailer
|
||||
(append
|
||||
(if (and (featurep 'custom) (fboundp 'custom-declare-variable))
|
||||
(list ["Customize..." speedbar-customize t]))
|
||||
(list
|
||||
'(["Customize..." speedbar-customize t]
|
||||
["Close" dframe-close-frame t]
|
||||
["Quit" delete-frame t] ))
|
||||
["Quit" delete-frame t])
|
||||
"Menu items appearing at the end of the speedbar menu.")
|
||||
|
||||
(defvar speedbar-desired-buffer nil
|
||||
|
||||
Reference in New Issue
Block a user