122 |
|
|
123 |
|
|
124 |
;;;###autoload |
;;;###autoload |
125 |
(defun scroll-all-mode (arg) |
(defun scroll-all-mode (&optional arg) |
126 |
"Toggle Scroll-All minor mode." |
"Toggle Scroll-All minor mode. |
127 |
|
With ARG, turn Scroll-All minor mode on if ARG is positive, off otherwise. |
128 |
|
When Scroll-All mode is on, scrolling commands entered in one window |
129 |
|
apply to all visible windows in the same frame." |
130 |
(interactive "P") |
(interactive "P") |
131 |
(setq scroll-all-mode |
(setq scroll-all-mode |
132 |
(if (null arg) (not scroll-all-mode) |
(if (null arg) (not scroll-all-mode) |