From eeb02076b8068cb6259010595f4d7998cfdd1dcb Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Thu, 15 Sep 1994 03:10:00 +0000 Subject: (shrink-window-if-larger-than-buffer): Use frame-width, not screen-width. --- lisp/window.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'lisp/window.el') diff --git a/lisp/window.el b/lisp/window.el index 305df621888..b8535648307 100644 --- a/lisp/window.el +++ b/lisp/window.el @@ -168,7 +168,7 @@ or if the window is the only window of its frame." (mini (cdr (assq 'minibuffer (frame-parameters)))) (edges (window-edges (selected-window)))) (if (and (< 1 (count-windows)) - (= (window-width) (screen-width)) + (= (window-width) (frame-width)) (pos-visible-in-window-p (point-min) window) (or (not mini) (< (nth 3 edges) -- cgit v1.2.1