From: Markus Rost <rost@math.uni-bielefeld.de>
Date: Sat, 23 Nov 2002 01:44:30 +0000 (+0000)
Subject: (scroll-all-mode): Move arg LIGHTER to the right place.
X-Git-Tag: ttn-vms-21-2-B4~12297
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=ddff27f94ed85882b49fed090571b55e3042d680;p=emacs.git

(scroll-all-mode): Move arg LIGHTER to the right place.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index c758da35931..10c4b139336 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2002-11-23   Markus Rost  <rost@math.ohio-state.edu>
+
+	* scroll-all.el (scroll-all-mode): Move arg LIGHTER to the right
+	place.
+
 2002-11-21  Nick Roberts  <nick@nick.uklinux.net>
 
 	* gdb-ui.el : General tidying. Patches from Stefan Monnier.
diff --git a/lisp/scroll-all.el b/lisp/scroll-all.el
index b1b03136a39..ac8ea6675fa 100644
--- a/lisp/scroll-all.el
+++ b/lisp/scroll-all.el
@@ -102,12 +102,13 @@
  
 
 ;;;###autoload
-(define-minor-mode scroll-all-mode " *SL*"
+(define-minor-mode scroll-all-mode
   "Toggle Scroll-All minor mode.
 With ARG, turn Scroll-All minor mode on if ARG is positive, off otherwise.
 When Scroll-All mode is on, scrolling commands entered in one window
 apply to all visible windows in the same frame."
- :global t
+  nil " *SL*" nil
+  :global t
   (if scroll-all-mode
       (add-hook 'post-command-hook 'scroll-all-check-to-scroll)
     (remove-hook 'post-command-hook 'scroll-all-check-to-scroll)))