mirror of
git://git.sv.gnu.org/emacs.git
synced 2026-02-16 17:24:23 +00:00
Fix gamegrid.el with high resolution displays
* lisp/play/gamegrid.el (gamegrid-setup-default-font): Clamp font size at eight.
This commit is contained in:
parent
efc46330aa
commit
0aa19e993b
1 changed files with 3 additions and 1 deletions
|
|
@ -411,7 +411,9 @@ convert to an Emacs image-spec instead")
|
|||
pixel-size (floor (* resy (/ point-size 72.27)))
|
||||
point-size (* (/ pixel-size resy) 72.27))
|
||||
(face-spec-set gamegrid-face
|
||||
`((t :height ,(floor (* point-size 10))))))))))
|
||||
;; With some very high resolution displays,
|
||||
;; point-size floored can be zero.
|
||||
`((t :height ,(max 8 (floor (* point-size 10)))))))))))
|
||||
|
||||
(defun gamegrid-initialize-display ()
|
||||
(setq gamegrid-display-mode (gamegrid-display-type))
|
||||
|
|
|
|||
Loading…
Reference in a new issue