diff options
| author | Markus Rost | 2002-11-23 03:26:24 +0000 |
|---|---|---|
| committer | Markus Rost | 2002-11-23 03:26:24 +0000 |
| commit | 3ff2317b2f52f33cd6d99a181da2b7c2b7fc3e9d (patch) | |
| tree | e867c577528499c929ede544fab9ff1b3c9a62cb /lisp/scroll-all.el | |
| parent | ddff27f94ed85882b49fed090571b55e3042d680 (diff) | |
| download | emacs-3ff2317b2f52f33cd6d99a181da2b7c2b7fc3e9d.tar.gz emacs-3ff2317b2f52f33cd6d99a181da2b7c2b7fc3e9d.zip | |
(scroll-all-mode): Add groups.
Diffstat (limited to 'lisp/scroll-all.el')
| -rw-r--r-- | lisp/scroll-all.el | 2 |
1 files changed, 2 insertions, 0 deletions
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))) |