changeset 15889:ca8f142ef5d2

[fixing previous change] (change-log-mode-map): Don't bind M-q. (change-log-mode): Set fill-paragraph-function instead.
author Karl Heuer <kwzh@gnu.org>
date Tue, 20 Aug 1996 20:50:35 +0000
parents f3afa8fdaf52
children c2ef756791fe
files lisp/add-log.el
diffstat 1 files changed, 7 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- 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: