comparison lisp/hi-lock.el @ 61398:499e1a6b0822

(hi-green): Fix face spec.
author Kim F. Storm <storm@cua.dk>
date Fri, 08 Apr 2005 22:03:08 +0000
parents 31aa9a390538
children 6fb026ad601f 02f1dbc4a199
comparison
equal deleted inserted replaced
61397:cf9ed6277047 61398:499e1a6b0822
117 (defgroup hi-lock-faces nil 117 (defgroup hi-lock-faces nil
118 "Faces for hi-lock." 118 "Faces for hi-lock."
119 :group 'hi-lock-interactive-text-highlighting) 119 :group 'hi-lock-interactive-text-highlighting)
120 120
121 (defface hi-yellow 121 (defface hi-yellow
122 '((((min-colors 88) (background dark)) 122 '((((min-colors 88) (background dark))
123 (:background "yellow1" :foreground "black")) 123 (:background "yellow1" :foreground "black"))
124 (((background dark)) (:background "yellow" :foreground "black")) 124 (((background dark)) (:background "yellow" :foreground "black"))
125 (((min-colors 88)) (:background "yellow1")) 125 (((min-colors 88)) (:background "yellow1"))
126 (t (:background "yellow"))) 126 (t (:background "yellow")))
127 "Default face for hi-lock mode." 127 "Default face for hi-lock mode."
132 (t (:background "pink"))) 132 (t (:background "pink")))
133 "Face for hi-lock mode." 133 "Face for hi-lock mode."
134 :group 'hi-lock-faces) 134 :group 'hi-lock-faces)
135 135
136 (defface hi-green 136 (defface hi-green
137 '((((min-colors 88) (background dark)) 137 '((((min-colors 88) (background dark))
138 (:background "green1" :foreground "black")) 138 (:background "green1" :foreground "black"))
139 (((background dark)) (:background "green" :foreground "black")) 139 (((background dark)) (:background "green" :foreground "black"))
140 ((min-colors 88) (:background "green1")) 140 (((min-colors 88)) (:background "green1"))
141 (t (:background "green"))) 141 (t (:background "green")))
142 "Face for hi-lock mode." 142 "Face for hi-lock mode."
143 :group 'hi-lock-faces) 143 :group 'hi-lock-faces)
144 144
145 (defface hi-blue 145 (defface hi-blue