diff options
| author | Richard M. Stallman | 1994-09-15 03:10:00 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1994-09-15 03:10:00 +0000 |
| commit | ad656bdc4ece20f0662b5877b3de6c20afb9f868 (patch) | |
| tree | 8e104b6bdae696751d8dfacf9528e0a2b9dadaa9 /lisp | |
| parent | 2677ad61f5da8a85dfd2b8f004275de88823e1fe (diff) | |
| download | emacs-ad656bdc4ece20f0662b5877b3de6c20afb9f868.tar.gz emacs-ad656bdc4ece20f0662b5877b3de6c20afb9f868.zip | |
(shrink-window-if-larger-than-buffer):
Use frame-width, not screen-width.
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/window.el | 2 |
1 files changed, 1 insertions, 1 deletions
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." | |||
| 168 | (mini (cdr (assq 'minibuffer (frame-parameters)))) | 168 | (mini (cdr (assq 'minibuffer (frame-parameters)))) |
| 169 | (edges (window-edges (selected-window)))) | 169 | (edges (window-edges (selected-window)))) |
| 170 | (if (and (< 1 (count-windows)) | 170 | (if (and (< 1 (count-windows)) |
| 171 | (= (window-width) (screen-width)) | 171 | (= (window-width) (frame-width)) |
| 172 | (pos-visible-in-window-p (point-min) window) | 172 | (pos-visible-in-window-p (point-min) window) |
| 173 | (or (not mini) | 173 | (or (not mini) |
| 174 | (< (nth 3 edges) | 174 | (< (nth 3 edges) |