diff options
| author | Karl Heuer <kwzh@gnu.org> | 1996-08-20 20:50:35 +0000 |
|---|---|---|
| committer | Karl Heuer <kwzh@gnu.org> | 1996-08-20 20:50:35 +0000 |
| commit | 45c50c5ded22a4ebc49eb7f2cdb472c9eeefffe9 (patch) | |
| tree | 279e9102bcaebf6604805916e00a4e4fe0faa128 /lisp/add-log.el | |
| parent | d6749f8f3d61ad9362f457d2d4f7c0dce80e0e78 (diff) | |
| download | emacs-45c50c5ded22a4ebc49eb7f2cdb472c9eeefffe9.tar.gz | |
[fixing previous change]
(change-log-mode-map): Don't bind M-q.
(change-log-mode): Set fill-paragraph-function instead.
Diffstat (limited to 'lisp/add-log.el')
| -rw-r--r-- | lisp/add-log.el | 7 |
1 files changed, 7 insertions, 0 deletions
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: |