summaryrefslogtreecommitdiff
path: root/lisp/hi-lock.el
diff options
context:
space:
mode:
authorStefan Monnier <monnier@iro.umontreal.ca>2012-05-21 00:33:54 -0400
committerStefan Monnier <monnier@iro.umontreal.ca>2012-05-21 00:33:54 -0400
commita52c0aa070a8d0919cf7c175d5a5f9a212ef3526 (patch)
tree5d42c0066455038c58f56b2b45caccd552887254 /lisp/hi-lock.el
parent5814f126ba1b8457c963e91c48a5bfa8108d55ac (diff)
downloademacs-a52c0aa070a8d0919cf7c175d5a5f9a212ef3526.tar.gz
* lisp/hi-lock.el (hi-lock-face-defaults): Move obsolete before definition.
Diffstat (limited to 'lisp/hi-lock.el')
-rw-r--r--lisp/hi-lock.el9
1 files changed, 4 insertions, 5 deletions
diff --git a/lisp/hi-lock.el b/lisp/hi-lock.el
index 32a041e6c09..2c2d08e19cc 100644
--- a/lisp/hi-lock.el
+++ b/lisp/hi-lock.el
@@ -204,16 +204,15 @@ patterns."
(defvar hi-lock-interactive-patterns nil
"Patterns provided to hi-lock by user. Should not be changed.")
+(define-obsolete-variable-alias 'hi-lock-face-history
+ 'hi-lock-face-defaults "23.1")
(defvar hi-lock-face-defaults
'("hi-yellow" "hi-pink" "hi-green" "hi-blue" "hi-black-b"
"hi-blue-b" "hi-red-b" "hi-green-b" "hi-black-hb")
"Default faces for hi-lock interactive functions.")
-;(dolist (f hi-lock-face-defaults) (unless (facep f) (error "%s not a face" f)))
-
-(define-obsolete-variable-alias 'hi-lock-face-history
- 'hi-lock-face-defaults
- "23.1")
+;;(dolist (f hi-lock-face-defaults)
+;; (unless (facep f) (error "%s not a face" f)))
(define-obsolete-variable-alias 'hi-lock-regexp-history
'regexp-history