diff options
author | Roland McGrath <roland@gnu.org> | 1993-08-03 06:38:26 +0000 |
---|---|---|
committer | Roland McGrath <roland@gnu.org> | 1993-08-03 06:38:26 +0000 |
commit | 5ed8d62f52b7d6bbbd01e2ba83ad46ccbe92ddc9 (patch) | |
tree | 054b8e1d369b3ba876c4267e150474f0959ae29c /lisp/window.el | |
parent | 46f950cab852ffab33a6d46e4894e6ba4e575945 (diff) | |
download | emacs-5ed8d62f52b7d6bbbd01e2ba83ad46ccbe92ddc9.tar.gz |
(shrink-window-if-larger-than-buffer): Pass WINDOW to
pos-visible-in-window-p.
Diffstat (limited to 'lisp/window.el')
-rw-r--r-- | lisp/window.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/window.el b/lisp/window.el index 1eda0ba960d..5f60dd72133 100644 --- a/lisp/window.el +++ b/lisp/window.el @@ -1,6 +1,6 @@ ;;; window.el --- GNU Emacs window commands aside from those written in C. -;;; Copyright (C) 1985, 1989, 1992 Free Software Foundation, Inc. +;;; Copyright (C) 1985, 1989, 1992, 1993 Free Software Foundation, Inc. ;; Maintainer: FSF @@ -158,7 +158,7 @@ or if the window is the only window of its frame." (modified (buffer-modified-p)) (buffer (current-buffer))) (if (and (< 1 (count-windows)) - (pos-visible-in-window-p (point-min))) + (pos-visible-in-window-p (point-min) window)) (unwind-protect (progn (select-window (or window w)) |