bug-gnu-emacs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

bug#18215: 24.4.50; OSX 10.6.8; set-frame-size by pixelwise does not wor


From: Keith David Bershatsky
Subject: bug#18215: 24.4.50; OSX 10.6.8; set-frame-size by pixelwise does not work following `make-fame`.
Date: Wed, 13 Aug 2014 20:44:53 -0700
User-agent: / () / () APEL/10.8 Emacs/24.4.50 (x86_64-apple-darwin10.8.0) MULE/6.0 (HANACHIRUSATO)

Here are a few printouts of `(window--dump-frame)` with three different builds:

(1) June 1, 2014 -- Emacs Trunk

(2) August 13, 2014 -- Emacs Trunk

(3) August 13, 2014 -- Emacs Trunk with the August 12, 2014 patch of nsterm.m

The last printout is with the patched nsterm.m and calling `M-x 
toggle-frame-maximized`.

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

I see no difference between the default behavior of August 13, 2014 Emacs Trunk 
(before applying the patch), versus after applying the August 12, 2014 patch of 
nsterm.m.

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

*window-frame-dump*_06_01_2014.txt

frame pixel: 1926 x 1058   cols/lines: 174 x 52   units: 11 x 20
frame text pixel: 1900 x 1054   cols/lines: 172 x 52
tool: 0  scroll: 0  fringe: 22  border: 2  right: 0  bottom: 0

#<window 3 on *GNU Emacs*>   parent: nil
pixel left: 0   top: 0   size: 1922 x 1034   new: 0
char left: 0   top: 0   size: 174 x 51   new: 0
normal: 1.0 x 1.0   new: 0
body pixel: 1900 x 1014   char: 172 x 50
width left fringe: 11  left margin: 0  right margin: 0
width right fringe: 11  scroll-bar: 0  divider: 0
height header-line: 0  mode-line: 20  divider: 0

#<window 4 on  *Minibuf-0*>   parent: nil
pixel left: 0   top: 1034   size: 1922 x 20   new: 0
char left: 0   top: 51   size: 1922 x 1   new: 0
normal: 1.0 x 1.0   new: 0
body pixel: 1900 x 20   char: 172 x 1
width left fringe: 11  left margin: 0  right margin: 0
width right fringe: 11  scroll-bar: 0  divider: 0
height header-line: 0  mode-line: 0  divider: 0


;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

*window_frame_dump*_08_13_2014.txt

frame pixel: 1920 x 1058   cols/lines: 175 x 52   units: 11 x 20
frame text pixel: 1900 x 1054   cols/lines: 172 x 52
tool: 0  scroll: 0/0  fringe: 16  border: 2  right: 0  bottom: 0

#<window 3 on *GNU Emacs*>   parent: nil
pixel left: 0   top: 0   size: 1916 x 1034   new: 1916
char left: 0   top: 0   size: 174 x 51   new: 174
normal: 1.0 x 1.0   new: 1.0
body pixel: 1900 x 1014   char: 172 x 50
width left fringe: 8  left margin: 0  right margin: 0
width right fringe: 8  scroll-bar: 0  divider: 0
height header-line: 0  mode-line: 20  divider: 0

#<window 4 on  *Minibuf-0*>   parent: nil
pixel left: 0   top: 1034   size: 1916 x 20   new: 0
char left: 0   top: 51   size: 1916 x 1   new: 174
normal: 1.0 x 1.0   new: 0
body pixel: 1900 x 20   char: 172 x 1
width left fringe: 8  left margin: 0  right margin: 0
width right fringe: 8  scroll-bar: 0  divider: 0
height header-line: 0  mode-line: 0  divider: 0

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

*window_frame_dump*_08_13_2014_patched.txt

frame pixel: 1920 x 1058   cols/lines: 175 x 52   units: 11 x 20
frame text pixel: 1900 x 1054   cols/lines: 172 x 52
tool: 0  scroll: 0/0  fringe: 16  border: 2  right: 0  bottom: 0

#<window 3 on *GNU Emacs*>   parent: nil
pixel left: 0   top: 0   size: 1916 x 1034   new: 1916
char left: 0   top: 0   size: 174 x 51   new: 174
normal: 1.0 x 1.0   new: 1.0
body pixel: 1900 x 1014   char: 172 x 50
width left fringe: 8  left margin: 0  right margin: 0
width right fringe: 8  scroll-bar: 0  divider: 0
height header-line: 0  mode-line: 20  divider: 0

#<window 4 on  *Minibuf-0*>   parent: nil
pixel left: 0   top: 1034   size: 1916 x 20   new: 0
char left: 0   top: 51   size: 1916 x 1   new: 174
normal: 1.0 x 1.0   new: 0
body pixel: 1900 x 20   char: 172 x 1
width left fringe: 8  left margin: 0  right margin: 0
width right fringe: 8  scroll-bar: 0  divider: 0
height header-line: 0  mode-line: 0  divider: 0

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

Printout with `toggle-frame-maximzed` following Emacs -Q

frame pixel: 1920 x 1000   cols/lines: 275 x 62   units: 7 x 16
frame text pixel: 1885 x 996   cols/lines: 269 x 62
tool: 0  scroll: 15/0  fringe: 16  border: 2  right: 0  bottom: 0

#<window 3 on *GNU Emacs*>   parent: nil
pixel left: 0   top: 0   size: 1916 x 980   new: 0
char left: 0   top: 0   size: 273 x 61   new: 0
normal: 1.0 x 1.0   new: 0
body pixel: 1885 x 964   char: 269 x 60
width left fringe: 8  left margin: 0  right margin: 0
width right fringe: 8  scroll-bar: 15  divider: 0
height header-line: 0  mode-line: 16  divider: 0

#<window 4 on  *Minibuf-0*>   parent: nil
pixel left: 0   top: 980   size: 1916 x 16   new: 0
char left: 0   top: 61   size: 1916 x 1   new: 0
normal: 1.0 x 1.0   new: 0
body pixel: 1885 x 16   char: 269 x 1
width left fringe: 8  left margin: 0  right margin: 0
width right fringe: 8  scroll-bar: 15  divider: 0
height header-line: 0  mode-line: 0  divider: 0

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

The settings used to run the tests are as follows:

(cond
  ((eq system-type 'darwin)
    (set-face-attribute 'default (selected-frame) :font 
"-*-Courier-normal-normal-normal-*-18-*-*-*-m-0-iso10646-1")
    (add-to-list 'default-frame-alist '(font . 
"-*-Courier-normal-normal-normal-*-18-*-*-*-m-0-iso10646-1")))
  ((eq system-type 'windows-nt)
    (set-face-attribute 'default nil :height 180)))

(set-face-attribute 'fringe nil :background "black")

(menu-bar-mode -1)

(tool-bar-mode -1)

(add-to-list 'default-frame-alist '(vertical-scroll-bars . nil))

(add-to-list 'default-frame-alist '(cursor-color . "yellow"))

(add-to-list 'default-frame-alist '(cursor-type . (bar . 2 )))

(add-to-list 'default-frame-alist '(background-color . "black"))

(add-to-list 'default-frame-alist '(foreground-color . "white"))

(let ((frame (selected-frame)))
  (cond
    ((eq system-type 'darwin)
      (setq ns-auto-hide-menu-bar t)
      (set-frame-position frame 0 0) ;; must come after `ns-auto-hide-menu-bar`
      (cond
        ((and
            (= 1920 (display-pixel-width))
            (= 1080 (display-pixel-height)))
          (set-frame-size frame 1900 1054 t))
        ((and
            (= 1920 (display-pixel-width))
            (= 1200 (display-pixel-height)))
          (set-frame-size frame 1894 1174 t))
        ((and
            (= 1280 (display-pixel-width))
            (= 800 (display-pixel-height)))
          (set-frame-size frame 1265 774 t))) )
    ((eq system-type 'windows-nt)
      (set-frame-position frame 0 0)
      (cond
        ((and
            (= 1920 (display-pixel-width))
            (= 1003 (display-pixel-height)))
          (set-frame-size frame 1890 940 t))
        ((and
            (= 1920 (display-pixel-width))
            (= 1123 (display-pixel-height)))
          (set-frame-size frame 1876 1052 t))
        ((and
            (= 1280 (display-pixel-width))
            (= 723 (display-pixel-height)))
          (set-frame-size frame 1250 670 t)))  )))





reply via email to

[Prev in Thread] Current Thread [Next in Thread]