(scroll-all-mode): Add groups.

2002-11-23 03:26:24 +00:00
parent ddff27f94e
commit 3ff2317b2f
2 changed files with 3 additions and 1 deletions
--- 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>

--- 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)))