mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-12-25 10:47:00 +00:00
Code Issues Releases Activity

(pong-border-options): Make the border colors slightly more bright.

Browse Source
This commit is contained in:
Eli Zaretskii 2002-02-06 12:06:19 +00:00
parent e029dcaf14
commit e77c1e8c4d
2 changed files with 7 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lisp/ChangeLog
View File

@ -2,6 +2,8 @@
* play/pong.el (pong-height): Don't use height that exceeds the
frame height.
(pong-border-options): Make the border colors slightly more
bright.
* play/gamegrid.el (gamegrid-display-type): Treat any
color-capable display as color-x, if display-color-p is fboundp.

6
lisp/play/pong.el
View File

@ -156,7 +156,11 @@
(t ?\+))
((color-x color-x)
(mono-x grid-x))
(((glyph color-x) [0.5 0.5 0.5])
;; The colors used to be [0.5 0.5 0.5], but that produces a black
;; color on 8-color tty's, which would make the border invisible.
;; 0.51 produces white on such tty's, and at the same time has
;; almost no effect on X and similar displays.
(((glyph color-x) [0.51 0.51 0.51])
(color-tty pong-border-color))))
(defconst pong-blank 0)