master c480789536 1/3: Remove extraneous defvars from edmacro.el

[Stefan Kangas]

branch: master
commit c4807895363108cd6f4425f650a341cb5cefb90c
Author: Stefan Kangas <stefan@marxist.se>
Commit: Stefan Kangas <stefan@marxist.se>

    Remove extraneous defvars from edmacro.el
    
    * lisp/edmacro.el (edmacro-fix-menu-commands): Remove extraneous
    defvars; they are already declared above.
---
 lisp/edmacro.el | 9 ++++-----
 1 file changed, 4 insertions(+), 5 deletions(-)

diff --git a/lisp/edmacro.el b/lisp/edmacro.el
index bdc50c5885..efffab9b30 100644
--- a/lisp/edmacro.el
+++ b/lisp/edmacro.el
@@ -251,6 +251,7 @@ If VERBOSE is `1', put everything on one line.  If VERBOSE 
is omitted
 or nil, use a compact 80-column format."
   (and macro (symbolp macro) (setq macro (symbol-function macro)))
   (edmacro-format-keys (or macro last-kbd-macro) verbose))
+
 
 ;;; Commands for *Edit Macro* buffer.
 
@@ -446,6 +447,7 @@ doubt, use whitespace."
   (interactive)
   (error "This mode can be enabled only by `edit-kbd-macro'"))
 (put 'edmacro-mode 'mode-class 'special)
+
 
 ;;; Formatting a keyboard macro as human-readable text.
 
@@ -637,12 +639,8 @@ This function assumes that the events can be stored in a 
string."
 (defun edmacro-fix-menu-commands (macro &optional noerror)
   (if (vectorp macro)
       (let (result)
-        ;; Not preloaded in without-x builds.
+        ;; Not preloaded in a --without-x build.
         (require 'mwheel)
-        (defvar mouse-wheel-down-event)
-        (defvar mouse-wheel-left-event)
-        (defvar mouse-wheel-right-event)
-        (defvar mouse-wheel-up-event)
        ;; Make a list of the elements.
        (setq macro (append macro nil))
        (dolist (ev macro)
@@ -669,6 +667,7 @@ This function assumes that the events can be stored in a 
string."
        ;; Reverse them again and make them back into a vector.
        (vconcat (nreverse result)))
     macro))
+
 
 ;;; Parsing a human-readable keyboard macro.