summaryrefslogtreecommitdiff
path: root/lisp/scroll-all.el
diff options
context:
space:
mode:
authorGlenn Morris <rgm@gnu.org>2002-04-21 17:36:16 +0000
committerGlenn Morris <rgm@gnu.org>2002-04-21 17:36:16 +0000
commit5bba9cfd48665a36a48ac95924c8084e376c135e (patch)
tree4c218d80dfd061eb4015abbf5dfe50c61fc0a7e4 /lisp/scroll-all.el
parentd278091be940a95aeaa6f9953d9e37543dcfe763 (diff)
downloademacs-5bba9cfd48665a36a48ac95924c8084e376c135e.tar.gz
(scroll-all-beginning-of-buffer-all, scroll-all-end-of-buffer-all): Call
beginning-of-buffer, end-of-buffer interactively.
Diffstat (limited to 'lisp/scroll-all.el')
-rw-r--r--lisp/scroll-all.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/scroll-all.el b/lisp/scroll-all.el
index 0126a601617..a72c422724c 100644
--- 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))))))