# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 782018962 0
# Node ID a7ac5850ecb433018e35cef614af7e1444dd5457
# Parent  151b595bc41a37293e6bdf8f888b9bb94451a952
(change-log-mode-map): Move the definition up.

diff -r 151b595bc41a -r a7ac5850ecb4 lisp/add-log.el
--- a/lisp/add-log.el	Thu Oct 13 00:02:32 1994 +0000
+++ b/lisp/add-log.el	Thu Oct 13 03:29:22 1994 +0000
@@ -49,6 +49,13 @@
     ("\(\\([^)\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 @@
        '(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(".