summaryrefslogtreecommitdiff
path: root/lisp/play
diff options
context:
space:
mode:
authorDan Nicolaescu <dann@ics.uci.edu>2005-08-15 21:29:32 +0000
committerDan Nicolaescu <dann@ics.uci.edu>2005-08-15 21:29:32 +0000
commite95e5f8193f5f7f11cb0238330b4d7f39760fe25 (patch)
tree694ea8d8e0381c23d8d33824c74e9aeacdb1b053 /lisp/play
parentca19f3f1d1690a79d296d22ed42102bd986fbbc6 (diff)
downloademacs-e95e5f8193f5f7f11cb0238330b4d7f39760fe25.tar.gz
* mh-customize.el: Do not use face-alias compatibility for
faces that did not appear in the previous Emacs release. * buff-menu.el: * compare-w.el: * emacs-lisp/testcover.el: * play/gomoku.el: * play/mpuz.el: * progmodes/flymake.el: * progmodes/gdb-ui.el: * progmodes/idlw-help.el: * progmodes/idlw-shell.el: * progmodes/ld-script.el: * progmodes/which-func.el: * ruler-mode.el: * strokes.el: * textmodes/sgml-mode.el: * textmodes/table.el: Do not use face-alias for backward compatibility for faces that did not appear in the previous Emacs release.
Diffstat (limited to 'lisp/play')
-rw-r--r--lisp/play/gomoku.el4
-rw-r--r--lisp/play/mpuz.el8
2 files changed, 0 insertions, 12 deletions
diff --git a/lisp/play/gomoku.el b/lisp/play/gomoku.el
index 5a53b4b888e..e9f7a07abe9 100644
--- a/lisp/play/gomoku.el
+++ b/lisp/play/gomoku.el
@@ -165,15 +165,11 @@ One useful value to include is `turn-on-font-lock' to highlight the pieces."
'((((class color)) (:foreground "red" :weight bold)))
"Face to use for Emacs' O."
:group 'gomoku)
-;; backward-compatibility alias
-(put 'gomoku-font-lock-O-face 'face-alias 'gomoku-O)
(defface gomoku-X
'((((class color)) (:foreground "green" :weight bold)))
"Face to use for your X."
:group 'gomoku)
-;; backward-compatibility alias
-(put 'gomoku-font-lock-X-face 'face-alias 'gomoku-X)
(defvar gomoku-font-lock-keywords
'(("O" . 'gomoku-O)
diff --git a/lisp/play/mpuz.el b/lisp/play/mpuz.el
index cc252a08719..948ae126ffa 100644
--- a/lisp/play/mpuz.el
+++ b/lisp/play/mpuz.el
@@ -62,31 +62,23 @@ t means never ding, and `error' means only ding on wrong input."
(t (:bold t)))
"*Face to use for letters to be solved."
:group 'mpuz)
-;; backward-compatibility alias
-(put 'mpuz-unsolved-face 'face-alias 'mpuz-unsolved)
(defface mpuz-solved
'((((class color)) (:foreground "green1" :bold t))
(t (:bold t)))
"*Face to use for solved digits."
:group 'mpuz)
-;; backward-compatibility alias
-(put 'mpuz-solved-face 'face-alias 'mpuz-solved)
(defface mpuz-trivial
'((((class color)) (:foreground "blue" :bold t))
(t (:bold t)))
"*Face to use for trivial digits solved for you."
:group 'mpuz)
-;; backward-compatibility alias
-(put 'mpuz-trivial-face 'face-alias 'mpuz-trivial)
(defface mpuz-text
'((t (:inherit variable-pitch)))
"*Face to use for text on right."
:group 'mpuz)
-;; backward-compatibility alias
-(put 'mpuz-text-face 'face-alias 'mpuz-text)
;; Mpuz mode and keymaps