diff options
| author | Richard M. Stallman <rms@gnu.org> | 1995-08-22 20:55:36 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1995-08-22 20:55:36 +0000 |
| commit | 5181be3a8833ff9137f4414e9c4bbe88d482e179 (patch) | |
| tree | d742b1c7359f29c1f83b7034426dd1fbab674681 /lisp/textmodes/two-column.el | |
| parent | d183f322f974fadbf2302c603ebe7ec3fb9646cd (diff) | |
| download | emacs-5181be3a8833ff9137f4414e9c4bbe88d482e179.tar.gz | |
(2C-mode): Use make-local-hook and add-hook.
Diffstat (limited to 'lisp/textmodes/two-column.el')
| -rw-r--r-- | lisp/textmodes/two-column.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/textmodes/two-column.el b/lisp/textmodes/two-column.el index 915661486ee..9b27b5ee37c 100644 --- a/lisp/textmodes/two-column.el +++ b/lisp/textmodes/two-column.el @@ -302,10 +302,10 @@ These keybindings can be customized in your ~/.emacs by `2C-mode-map', 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)) |