diff options
| author | Karl Heuer <kwzh@gnu.org> | 1996-08-20 19:11:55 +0000 |
|---|---|---|
| committer | Karl Heuer <kwzh@gnu.org> | 1996-08-20 19:11:55 +0000 |
| commit | 60f10a06e17d4d020a6b5dc068132e8680f0a4dd (patch) | |
| tree | b37310102dd670e8839407f3bbbed290202c0581 /lisp/add-log.el | |
| parent | 950086e6eb3c1ceb84a8d0a6f4f30f76b6f56f11 (diff) | |
| download | emacs-60f10a06e17d4d020a6b5dc068132e8680f0a4dd.tar.gz | |
(change-log-mode): Set fill-paragraph-function.
(change-log-mode-map): Deleted; no bindings left.
Diffstat (limited to 'lisp/add-log.el')
| -rw-r--r-- | lisp/add-log.el | 14 |
1 files changed, 4 insertions, 10 deletions
diff --git a/lisp/add-log.el b/lisp/add-log.el index c6974583e66..84ea0c71024 100644 --- a/lisp/add-log.el +++ b/lisp/add-log.el @@ -52,13 +52,6 @@ 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) @@ -283,9 +276,10 @@ Runs `change-log-mode-hook'." mode-name "Change Log" left-margin 8 fill-column 74 - indent-tabs-mode t - tab-width 8) - (use-local-map change-log-mode-map) + indent-tabs-mode t + tab-width 8) + (set (make-local-variable 'fill-paragraph-function) + 'change-log-fill-paragraph) ;; Let each entry behave as one paragraph: ;; We really do want "^" in paragraph-start below: it is only the lines that ;; begin at column 0 (despite the left-margin of 8) that we are looking for. |