diff options
author | Richard M. Stallman <[email protected]> | 1994-10-13 03:29:22 +0000 |
---|---|---|
committer | Richard M. Stallman <[email protected]> | 1994-10-13 03:29:22 +0000 |
commit | dab0cb956404af13e6201bf641b54cffab5d0166 (patch) | |
tree | 1336e427643191f65e674491975b8f075e4cd7c0 /lisp | |
parent | 908477d9d301d4bc487aea02c8b2bc8681ffb960 (diff) |
(change-log-mode-map): Move the definition up.
Diffstat (limited to 'lisp')
-rw-r--r-- | lisp/add-log.el | 14 |
1 files changed, 7 insertions, 7 deletions
diff --git a/lisp/add-log.el b/lisp/add-log.el index 0012f9f4d1..b7557b0150 100644 --- a/lisp/add-log.el +++ b/lisp/add-log.el @@ -49,6 +49,13 @@ 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)) + (define-key change-log-mode-map "\M-q" 'change-log-fill-paragraph)) + (defun change-log-name () (or change-log-default-name (if (eq system-type 'vax-vms) @@ -269,13 +276,6 @@ Runs `change-log-mode-hook'." '(change-log-font-lock-keywords t)) (run-hooks 'change-log-mode-hook)) -(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)) - (define-key change-log-mode-map "\M-q" 'change-log-fill-paragraph)) - ;; It might be nice to have a general feature to replace this. The idea I ;; have is a variable giving a regexp matching text which should not be ;; moved from bol by filling. change-log-mode would set this to "^\\s *\\s(". |