(scroll-all-mode): Add groups.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 10c4b139336656d67b7a4f594e86ece55e58266f..06e9ed1158044136114621387cfac09bc44c8a8a 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,7 +1,7 @@
 2002-11-23   Markus Rost  <rost@math.ohio-state.edu>
 
        * scroll-all.el (scroll-all-mode): Move arg LIGHTER to the right
-       place.
+       place.  Add groups.
 
 2002-11-21  Nick Roberts  <nick@nick.uklinux.net>
 

diff --git a/lisp/scroll-all.el b/lisp/scroll-all.el
index ac8ea6675fa40e79b0293146b0b6e7e97a6d12d7..c17b251353fab39c80b6e5a0e17f1580c26dd89a 100644 (file)
--- 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
 apply to all visible windows in the same frame."
   nil " *SL*" nil
   :global t
+  :group 'windows
+  :group 'scrolling
   (if scroll-all-mode
       (add-hook 'post-command-hook 'scroll-all-check-to-scroll)
     (remove-hook 'post-command-hook 'scroll-all-check-to-scroll)))