]> git.eshelyaron.com Git - emacs.git/commitdiff
Remove some Emacs 20 compat code from speedbar.el
authorStefan Kangas <stefan@marxist.se>
Tue, 27 Oct 2020 21:32:37 +0000 (22:32 +0100)
committerStefan Kangas <stefan@marxist.se>
Tue, 27 Oct 2020 21:32:37 +0000 (22:32 +0100)
* lisp/speedbar.el (speedbar-easymenu-definition-trailer): Remove
Emacs 20 compat code.

lisp/speedbar.el

index 9c5f028e4ab236c9aff85b8eab444801115558fe..991c8a33d46cbde5454bbd18acf86bcdb144e9de 100644 (file)
@@ -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