Mercurial > emacs
changeset 12934:7fd541abf2af
(2C-mode): Use make-local-hook and add-hook.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Tue, 22 Aug 1995 20:55:36 +0000 |
parents | 61f11030ecc9 |
children | f65e672e038e |
files | lisp/textmodes/two-column.el |
diffstat | 1 files changed, 2 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/textmodes/two-column.el Tue Aug 22 20:30:57 1995 +0000 +++ b/lisp/textmodes/two-column.el Tue Aug 22 20:55:36 1995 +0000 @@ -302,10 +302,10 @@ The appearance of the screen can be customized by the variables `2C-window-width', `2C-beyond-fill-column', `2C-mode-line-format' and `truncate-partial-width-windows'." - (make-variable-buffer-local 'post-command-hook) + (make-local-hook 'post-command-hook) + (add-hook 'post-command-hook '2C-autoscroll nil t) (setq fill-column (- 2C-window-width 2C-beyond-fill-column) - post-command-hook '2C-autoscroll mode-line-format 2C-mode-line-format 2C-mode other) (run-hooks '2C-mode-hook))