/[emacs]/emacs/lisp/hi-lock.el
ViewVC logotype

Diff of /emacs/lisp/hi-lock.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.21 by monnier, Thu Mar 24 22:12:00 2005 UTC revision 1.22 by dann, Fri Apr 8 14:26:13 2005 UTC
# Line 119  calls." Line 119  calls."
119    :group 'hi-lock-interactive-text-highlighting)    :group 'hi-lock-interactive-text-highlighting)
120    
121  (defface hi-yellow  (defface hi-yellow
122    '((((background dark)) (:background "yellow" :foreground "black"))    '((((min-colors 88) (background dark))
123         (:background "yellow1" :foreground "black"))
124        (((background dark)) (:background "yellow" :foreground "black"))
125        (((min-colors 88)) (:background "yellow1"))
126      (t (:background "yellow")))      (t (:background "yellow")))
127    "Default face for hi-lock mode."    "Default face for hi-lock mode."
128    :group 'hi-lock-faces)    :group 'hi-lock-faces)
# Line 131  calls." Line 134  calls."
134    :group 'hi-lock-faces)    :group 'hi-lock-faces)
135    
136  (defface hi-green  (defface hi-green
137    '((((background dark)) (:background "green" :foreground "black"))    '((((min-colors 88) (background dark))
138         (:background "green1" :foreground "black"))
139        (((background dark)) (:background "green" :foreground "black"))
140        ((min-colors 88) (:background "green1"))
141      (t (:background "green")))      (t (:background "green")))
142    "Face for hi-lock mode."    "Face for hi-lock mode."
143    :group 'hi-lock-faces)    :group 'hi-lock-faces)
# Line 148  calls." Line 154  calls."
154    :group 'hi-lock-faces)    :group 'hi-lock-faces)
155    
156  (defface hi-blue-b  (defface hi-blue-b
157    '((t (:weight bold :foreground "blue")))    '((((min-colors 88)) (:weight bold :foreground "blue1"))
158        (t (:weight bold :foreground "blue")))
159    "Face for hi-lock mode."    "Face for hi-lock mode."
160    :group 'hi-lock-faces)    :group 'hi-lock-faces)
161    
162  (defface hi-green-b  (defface hi-green-b
163    '((t (:weight bold :foreground "green")))    '((((min-colors 88)) (:weight bold :foreground "green1"))
164        (t (:weight bold :foreground "green")))
165    "Face for hi-lock mode."    "Face for hi-lock mode."
166    :group 'hi-lock-faces)    :group 'hi-lock-faces)
167    
168  (defface hi-red-b  (defface hi-red-b
169    '((t (:weight bold :foreground "red")))    '((((min-colors 88)) (:weight bold :foreground "red1"))
170        (t (:weight bold :foreground "red")))
171    "Face for hi-lock mode."    "Face for hi-lock mode."
172    :group 'hi-lock-faces)    :group 'hi-lock-faces)
173    

Legend:
Removed from v.1.21  
changed lines
  Added in v.1.22

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26