From 45c50c5ded22a4ebc49eb7f2cdb472c9eeefffe9 Mon Sep 17 00:00:00 2001 From: Karl Heuer Date: Tue, 20 Aug 1996 20:50:35 +0000 Subject: [PATCH] [fixing previous change] (change-log-mode-map): Don't bind M-q. (change-log-mode): Set fill-paragraph-function instead. --- lisp/add-log.el | 7 +++++++ 1 file changed, 7 insertions(+) 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: -- 2.39.2