diff options
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/ChangeLog | 2 | ||||
| -rw-r--r-- | lisp/scroll-all.el | 2 |
2 files changed, 3 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 10c4b139336..06e9ed11580 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,7 +1,7 @@ | |||
| 1 | 2002-11-23 Markus Rost <rost@math.ohio-state.edu> | 1 | 2002-11-23 Markus Rost <rost@math.ohio-state.edu> |
| 2 | 2 | ||
| 3 | * scroll-all.el (scroll-all-mode): Move arg LIGHTER to the right | 3 | * scroll-all.el (scroll-all-mode): Move arg LIGHTER to the right |
| 4 | place. | 4 | place. Add groups. |
| 5 | 5 | ||
| 6 | 2002-11-21 Nick Roberts <nick@nick.uklinux.net> | 6 | 2002-11-21 Nick Roberts <nick@nick.uklinux.net> |
| 7 | 7 | ||
diff --git a/lisp/scroll-all.el b/lisp/scroll-all.el index ac8ea6675fa..c17b251353f 100644 --- a/lisp/scroll-all.el +++ b/lisp/scroll-all.el | |||
| @@ -109,6 +109,8 @@ When Scroll-All mode is on, scrolling commands entered in one window | |||
| 109 | apply to all visible windows in the same frame." | 109 | apply to all visible windows in the same frame." |
| 110 | nil " *SL*" nil | 110 | nil " *SL*" nil |
| 111 | :global t | 111 | :global t |
| 112 | :group 'windows | ||
| 113 | :group 'scrolling | ||
| 112 | (if scroll-all-mode | 114 | (if scroll-all-mode |
| 113 | (add-hook 'post-command-hook 'scroll-all-check-to-scroll) | 115 | (add-hook 'post-command-hook 'scroll-all-check-to-scroll) |
| 114 | (remove-hook 'post-command-hook 'scroll-all-check-to-scroll))) | 116 | (remove-hook 'post-command-hook 'scroll-all-check-to-scroll))) |