Mercurial > hg > xemacs-beta

comparison lisp/modes/make-mode.el @ 124:9b50b4588a93 r20-1b15

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-1b15
author cvs
date Mon, 13 Aug 2007 09:26:39 +0200
parents cca96a509cfe
children 1370575f1259
comparison
equal deleted inserted replaced
123:c77884c6318d 124:9b50b4588a93
252 ;#### 252 ;####
253 ;(add-to-list 'facemenu-unlisted-faces 'makefile-space-face) 253 ;(add-to-list 'facemenu-unlisted-faces 'makefile-space-face)
254 ; Bogus FSFmacs crap. 254 ; Bogus FSFmacs crap.
255 (defface makefile-space-face 255 (defface makefile-space-face
256 '((((class color)) 256 '((((class color))
257 (:background "hotpink")) ; uhm 257 (:background "hotpink")) ; Yeah!
258 (((class grayscale) 258 ;; Everything else, just choose the most visible background
259 (background light)) 259 ;; color. We don't care about foreground, since it is only used
260 (:background "black")) 260 ;; for whitespace.
261 (((class grayscale) 261 (((background light))
262 (background black)) 262 (:background "black"))
263 (:background "white")) 263 (((background dark))
264 (((class mono) 264 (:background "white")))
265 (background light)) 265 "Face to use for highlighting leading Makefile spaces in Font-Lock mode."
266 (:background "white"))
267 (((class mono)
268 (background dark))
269 (:background "black")))
270 "Face to use for highlighting leading spaces in Font-Lock mode."
271 :group 'makefile-mode) 266 :group 'makefile-mode)
272 267
273 ;Older version of same. 268 ;Older version of same.
274 ;(defconst makefile-font-lock-keywords (purecopy 269 ;(defconst makefile-font-lock-keywords (purecopy
275 ; (list 270 ; (list