Mercurial > emacs

changeset 1488:3d8dfdaee443

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(fortran-window-create): Use screen-width, not frame-width.
author Richard M. Stallman <rms@gnu.org>
date Tue, 27 Oct 1992 20:19:00 +0000
parents 09bc6fe443d9
children c3d069d83cc6
files lisp/progmodes/fortran.el
diffstat 1 files changed, 2 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/progmodes/fortran.el	Tue Oct 27 20:11:05 1992 +0000
+++ b/lisp/progmodes/fortran.el	Tue Oct 27 20:19:00 1992 +0000
@@ -514,8 +514,8 @@
   (condition-case error
       (progn
 	(let ((window-min-width 2))
-	  (if (< (window-width) (frame-width))
-	      (enlarge-window-horizontally (- (frame-width)
+	  (if (< (window-width) (screen-width))
+	      (enlarge-window-horizontally (- (screen-width)
 					      (window-width) 1)))
 	  (split-window-horizontally 73)
 	  (other-window 1)