# HG changeset patch # User Markus Rost # Date 1038015849 0 # Node ID 05b26d360108352e1bacb226a860cbc4070fbfd6 # Parent a2c6756675e8eee4d0e4e19a44f94663777f9a9a (scroll-all-mode): Move arg LIGHTER to the right place. diff -r a2c6756675e8 -r 05b26d360108 lisp/scroll-all.el --- a/lisp/scroll-all.el Fri Nov 22 12:23:29 2002 +0000 +++ b/lisp/scroll-all.el Sat Nov 23 01:44:09 2002 +0000 @@ -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)))