Mercurial > emacs

diff lisp/scroll-all.el @ 44725:60dbf4a139f2

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(scroll-all-beginning-of-buffer-all, scroll-all-end-of-buffer-all): Call beginning-of-buffer, end-of-buffer interactively.
author Glenn Morris <rgm@gnu.org>
date Sun, 21 Apr 2002 17:36:16 +0000
parents c4139de15915
children 5d3c147b760a
line wrap: on
line diff
--- a/lisp/scroll-all.el	Sun Apr 21 17:15:46 2002 +0000
+++ b/lisp/scroll-all.el	Sun Apr 21 17:36:16 2002 +0000
@@ -119,7 +119,7 @@
     (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 @@
     (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))))))