(scroll-all-beginning-of-buffer-all, scroll-all-end-of-buffer-all): Call

beginning-of-buffer, end-of-buffer interactively.

diff --git a/lisp/scroll-all.el b/lisp/scroll-all.el
index 0126a6016171bd51f6b31087401029c2a9512acf..a72c422724c70297c9958986aa48c7b7212fabd4 100644 (file)
--- a/lisp/scroll-all.el
+++ b/lisp/scroll-all.el
@@ -119,7 +119,7 @@ use either M-x customize or the function `scroll-all-mode'."
     (when (> num-windows 1)
          (other-window 1)
          (while (< count num-windows)
-               (beginning-of-buffer)
+               (call-interactively 'beginning-of-buffer)
                (other-window 1)
                (setq count (1+ count))))))
 
@@ -131,7 +131,7 @@ use either M-x customize or the function `scroll-all-mode'."
     (when (> num-windows 1)
          (other-window 1)
          (while (< count num-windows)
-               (end-of-buffer)
+               (call-interactively 'end-of-buffer)
                (other-window 1)
                (setq count (1+ count))))))