diff options
| -rw-r--r-- | lisp/play/landmark.el | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/lisp/play/landmark.el b/lisp/play/landmark.el index f9e4f8d2678..93300df4143 100644 --- a/lisp/play/landmark.el +++ b/lisp/play/landmark.el | |||
| @@ -220,22 +220,22 @@ | |||
| 220 | (defvar lm-emacs-won () | 220 | (defvar lm-emacs-won () |
| 221 | "*For making font-lock use the winner's face for the line.") | 221 | "*For making font-lock use the winner's face for the line.") |
| 222 | 222 | ||
| 223 | (defvar lm-font-lock-O-face | 223 | (defvar lm-font-lock-face-O |
| 224 | (if window-system | 224 | (if window-system |
| 225 | (list (facemenu-get-face 'fg:red) 'bold)) | 225 | (list (facemenu-get-face 'fg:red) 'bold)) |
| 226 | "*Face to use for Emacs' O.") | 226 | "*Face to use for Emacs' O.") |
| 227 | 227 | ||
| 228 | (defvar lm-font-lock-X-face | 228 | (defvar lm-font-lock-face-X |
| 229 | (if window-system | 229 | (if window-system |
| 230 | (list (facemenu-get-face 'fg:green) 'bold)) | 230 | (list (facemenu-get-face 'fg:green) 'bold)) |
| 231 | "*Face to use for your X.") | 231 | "*Face to use for your X.") |
| 232 | 232 | ||
| 233 | (defvar lm-font-lock-keywords | 233 | (defvar lm-font-lock-keywords |
| 234 | '(("O" . lm-font-lock-O-face) | 234 | '(("O" . lm-font-lock-face-O) |
| 235 | ("X" . lm-font-lock-X-face) | 235 | ("X" . lm-font-lock-face-X) |
| 236 | ("[-|/\\]" 0 (if lm-emacs-won | 236 | ("[-|/\\]" 0 (if lm-emacs-won |
| 237 | lm-font-lock-O-face | 237 | lm-font-lock-face-O |
| 238 | lm-font-lock-X-face))) | 238 | lm-font-lock-face-X))) |
| 239 | "*Font lock rules for Lm.") | 239 | "*Font lock rules for Lm.") |
| 240 | 240 | ||
| 241 | (put 'lm-mode 'front-sticky | 241 | (put 'lm-mode 'front-sticky |