(fortran-window-create): Use screen-width, not frame-width.
This commit is contained in:
parent
1c3c9e649f
commit
c6cf2c1e4f
1 changed files with 2 additions and 2 deletions
|
@ -514,8 +514,8 @@ See also `fortran-window-create-momentarily'."
|
|||
(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)
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue