equal
deleted
inserted
replaced
139 tx ty |
139 tx ty |
140 ) |
140 ) |
141 ;; Next formulas discovered empiric on Windows host with default font. |
141 ;; Next formulas discovered empiric on Windows host with default font. |
142 (setq tx (- (/ px fx) 7)) |
142 (setq tx (- (/ px fx) 7)) |
143 (setq ty (- (/ py fy) 4)) |
143 (setq ty (- (/ py fy) 4)) |
144 (setq initial-frame-alist '((top . 0) (left . 0))) |
144 (setq initial-frame-alist '((top . 2) (left . 2))) |
145 (add-to-list 'initial-frame-alist (cons 'width tx)) |
145 (add-to-list 'initial-frame-alist (cons 'width tx)) |
146 (add-to-list 'initial-frame-alist (cons 'height ty)) |
146 (add-to-list 'initial-frame-alist (cons 'height ty)) |
147 ) ) |
147 ) ) |
148 |
148 |
149 (menu-bar-mode -1) |
149 (menu-bar-mode -1) |