From e77c1e8c4d7381fc0f6b0f67df083daf4d30992c Mon Sep 17 00:00:00 2001 From: Eli Zaretskii Date: Wed, 6 Feb 2002 12:06:19 +0000 Subject: [PATCH] (pong-border-options): Make the border colors slightly more bright. --- lisp/ChangeLog | 2 ++ lisp/play/pong.el | 6 +++++- 2 files changed, 7 insertions(+), 1 deletion(-) 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) -- 2.39.5