diff options
| -rw-r--r-- | lisp/ChangeLog | 2 | ||||
| -rw-r--r-- | lisp/play/pong.el | 6 |
2 files changed, 7 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 430856df6d7..77677715799 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -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. diff --git a/lisp/play/pong.el b/lisp/play/pong.el index 36bd92137ec..07c72a129a3 100644 --- a/lisp/play/pong.el +++ b/lisp/play/pong.el @@ -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) |