Mercurial > emacs

changeset 23376:c27c5254e5d4

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(lm-font-lock-face-O, lm-font-lock-face-X): Renamed from lm-font-lock-O-face, lm-font-lock-X-face to avoid confusing customize.
author Karl Heuer <kwzh@gnu.org>
date Tue, 06 Oct 1998 22:30:28 +0000
parents 2656333fd35e
children acb6d2c4220b
files lisp/play/landmark.el
diffstat 1 files changed, 6 insertions(+), 6 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/play/landmark.el	Tue Oct 06 12:19:11 1998 +0000
+++ b/lisp/play/landmark.el	Tue Oct 06 22:30:28 1998 +0000
@@ -220,22 +220,22 @@
 (defvar lm-emacs-won ()
   "*For making font-lock use the winner's face for the line.")
 
-(defvar lm-font-lock-O-face
+(defvar lm-font-lock-face-O
   (if window-system
       (list (facemenu-get-face 'fg:red) 'bold))
   "*Face to use for Emacs' O.")
 
-(defvar lm-font-lock-X-face
+(defvar lm-font-lock-face-X
   (if window-system
       (list (facemenu-get-face 'fg:green) 'bold))
   "*Face to use for your X.")
 
 (defvar lm-font-lock-keywords
-  '(("O" . lm-font-lock-O-face)
-    ("X" . lm-font-lock-X-face)
+  '(("O" . lm-font-lock-face-O)
+    ("X" . lm-font-lock-face-X)
     ("[-|/\\]" 0 (if lm-emacs-won
-		     lm-font-lock-O-face
-		   lm-font-lock-X-face)))
+		     lm-font-lock-face-O
+		   lm-font-lock-face-X)))
   "*Font lock rules for Lm.")
 
 (put 'lm-mode 'front-sticky