# HG changeset patch
# User Karl Heuer <kwzh@gnu.org>
# Date 840574235 0
# Node ID ca8f142ef5d2bf5fd638c26ab23e10be7975d007
# Parent  f3afa8fdaf5208280716d2229627bfe3abf0db87
[fixing previous change]
(change-log-mode-map): Don't bind M-q.
(change-log-mode): Set fill-paragraph-function instead.

diff -r f3afa8fdaf52 -r ca8f142ef5d2 lisp/add-log.el
--- a/lisp/add-log.el	Tue Aug 20 20:42:52 1996 +0000
+++ b/lisp/add-log.el	Tue Aug 20 20:50:35 1996 +0000
@@ -52,6 +52,12 @@
     ("(\\([^)\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 @@
 	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: