bug#6164: 24.0.50; scroll-all-mode is broken

[Juri Linkov]

> 1. emacs -Q
> 2. Visit two files that are big enough to scroll up and down.
> 3. Type `C-x 2' or `C-x 3' and the `C-x b' to display the two visited
>    filed in the split windows.
> 4. Type `M-x scroll-all-mode' to enable this minor mode.
> 5. Type `C-v'.
> => Only the selected buffer scrolls, whereas with scroll-all-mode
> enabled both buffers should scroll.

Thanks for the bug report.  This patch should fix it:

=== modified file 'lisp/scroll-all.el'
--- lisp/scroll-all.el  2010-01-13 08:35:10 +0000
+++ lisp/scroll-all.el  2010-05-10 23:18:25 +0000
@@ -90,9 +90,9 @@ (defun scroll-all-check-to-scroll ()
         (call-interactively 'scroll-all-scroll-down-all))
        ((eq this-command 'previous-line)
         (call-interactively 'scroll-all-scroll-up-all))
-       ((eq this-command 'scroll-up)
+       ((memq this-command '(scroll-up scroll-up-command))
         (call-interactively 'scroll-all-page-down-all))
-       ((eq this-command 'scroll-down)
+       ((memq this-command '(scroll-down scroll-down-command))
         (call-interactively 'scroll-all-page-up-all))
        ((eq this-command 'beginning-of-buffer)
         (call-interactively 'scroll-all-beginning-of-buffer-all))

-- 
Juri Linkov
http://www.jurta.org/emacs/