]> code.delx.au - gnu-emacs/blobdiff - lisp/scroll-all.el
*** empty log message ***
[gnu-emacs] / lisp / scroll-all.el
index ac8ea6675fa40e79b0293146b0b6e7e97a6d12d7..f3bd3d334ffa47b48d2c242dfab0b86945aba70c 100644 (file)
@@ -99,7 +99,7 @@
         (call-interactively 'scroll-all-beginning-of-buffer-all))
        ((eq this-command 'end-of-buffer)
         (call-interactively 'scroll-all-end-of-buffer-all))))
+
 
 ;;;###autoload
 (define-minor-mode scroll-all-mode
@@ -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)))