From: Richard M. Stallman <rms@gnu.org>
Date: Sat, 25 Jun 1994 19:08:29 +0000 (+0000)
Subject: (Fother_window_for_scrolling): New function.
X-Git-Tag: emacs-19.34~7794
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=eb16ec06bbd73d1c2059e048cd385301e5510b68;p=emacs.git

(Fother_window_for_scrolling): New function.
(Fscroll_other_window): Use that.
(syms_of_window): defsubr it.

(Fsave_window_excursion): Doc fix.
---

diff --git a/src/window.c b/src/window.c
index 347a1f5ec95..0770c44e9d5 100644
--- a/src/window.c
+++ b/src/window.c
@@ -2348,6 +2348,7 @@ If in the minibuffer, `minibuffer-scroll-window' if non-nil\n\
 specifies the window.\n\
 If `other-window-scroll-buffer' is non-nil, a window\n\
 showing that buffer is used.")
+  ()
 {
   Lisp_Object window;
 
@@ -2984,8 +2985,10 @@ redirection (see `redirect-frame-focus').")
 DEFUN ("save-window-excursion", Fsave_window_excursion, Ssave_window_excursion,
   0, UNEVALLED, 0,
   "Execute body, preserving window sizes and contents.\n\
-Restores which buffer appears in which window, where display starts,\n\
-as well as the current buffer.\n\
+Restore which buffer appears in which window, where display starts,\n\
+and the value of point and mark for each window.\n\
+Also restore which buffer is current.\n\
+But do not preserve point in the current buffer.\n\
 Does not restore the value of point in current buffer.")
   (args)
      Lisp_Object args;