(change-log-mode-map): Move the definition up.

diff --git a/lisp/add-log.el b/lisp/add-log.el
index 0012f9f4d1f7f44cc4d0edad2915666f9dd0577e..b7557b0150ad0e3a81c98073a0f67e1b275fab6e 100644 (file)
--- a/lisp/add-log.el
+++ b/lisp/add-log.el
@@ -49,6 +49,13 @@ This defaults to the value of `user-mail-address'.")
     ("\(\\([^)\n]+\\)\)" 1 font-lock-keyword-face))    ; Function name.
   "Additional expressions to highlight in Change Log mode.")
 
+(defvar change-log-mode-map nil
+  "Keymap for Change Log major mode.")
+(if change-log-mode-map
+    nil
+  (setq change-log-mode-map (make-sparse-keymap))
+  (define-key change-log-mode-map "\M-q" 'change-log-fill-paragraph))
+
 (defun change-log-name ()
   (or change-log-default-name
       (if (eq system-type 'vax-vms) 
@@ -269,13 +276,6 @@ Runs `change-log-mode-hook'."
        '(change-log-font-lock-keywords t))
   (run-hooks 'change-log-mode-hook))
 
-(defvar change-log-mode-map nil
-  "Keymap for Change Log major mode.")
-(if change-log-mode-map
-    nil
-  (setq change-log-mode-map (make-sparse-keymap))
-  (define-key change-log-mode-map "\M-q" 'change-log-fill-paragraph))
-
 ;; It might be nice to have a general feature to replace this.  The idea I
 ;; have is a variable giving a regexp matching text which should not be
 ;; moved from bol by filling.  change-log-mode would set this to "^\\s *\\s(".