diff options
| -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 @@ | |||
| 1 | ;;; window.el --- GNU Emacs window commands aside from those written in C. | 1 | ;;; window.el --- GNU Emacs window commands aside from those written in C. |
| 2 | 2 | ||
| 3 | ;;; Copyright (C) 1985, 1989, 1992 Free Software Foundation, Inc. | 3 | ;;; Copyright (C) 1985, 1989, 1992, 1993 Free Software Foundation, Inc. |
| 4 | 4 | ||
| 5 | ;; Maintainer: FSF | 5 | ;; Maintainer: FSF |
| 6 | 6 | ||
| @@ -158,7 +158,7 @@ or if the window is the only window of its frame." | |||
| 158 | (modified (buffer-modified-p)) | 158 | (modified (buffer-modified-p)) |
| 159 | (buffer (current-buffer))) | 159 | (buffer (current-buffer))) |
| 160 | (if (and (< 1 (count-windows)) | 160 | (if (and (< 1 (count-windows)) |
| 161 | (pos-visible-in-window-p (point-min))) | 161 | (pos-visible-in-window-p (point-min) window)) |
| 162 | (unwind-protect | 162 | (unwind-protect |
| 163 | (progn | 163 | (progn |
| 164 | (select-window (or window w)) | 164 | (select-window (or window w)) |