From: Karl Heuer <kwzh@gnu.org>
Date: Tue, 20 Aug 1996 20:50:35 +0000 (+0000)
Subject: [fixing previous change]
X-Git-Tag: emacs-20.1~4055
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=45c50c5ded22a4ebc49eb7f2cdb472c9eeefffe9;p=emacs.git

[fixing previous change]
(change-log-mode-map): Don't bind M-q.
(change-log-mode): Set fill-paragraph-function instead.
---

diff --git a/lisp/add-log.el b/lisp/add-log.el
index 84ea0c71024..ff1ecabbdcc 100644
--- a/lisp/add-log.el
+++ b/lisp/add-log.el
@@ -52,6 +52,12 @@ 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)))
+
 (defun change-log-name ()
   (or change-log-default-name
       (if (eq system-type 'vax-vms) 
@@ -278,6 +284,7 @@ Runs `change-log-mode-hook'."
 	fill-column 74
 	indent-tabs-mode t
 	tab-width 8)
+  (use-local-map change-log-mode-map)
   (set (make-local-variable 'fill-paragraph-function)
        'change-log-fill-paragraph)
   ;; Let each entry behave as one paragraph: