(make-local-variable 'makefile-need-macro-pickup)
;; Font lock.
- (makefile-define-space-face)
+ (if (fboundp 'makefile-define-space-face)
+ (makefile-define-space-face))
(make-local-variable 'font-lock-defaults)
(setq font-lock-defaults '(makefile-font-lock-keywords))
(nreverse alist)))
(defun makefile-define-space-face ()
- (if (eq window-system 'x)
- (make-face 'makefile-space-face))
- (or (face-differs-from-default-p 'makefile-space-face)
+ (make-face 'makefile-space-face)
+ (or (not (eq window-system 'x))
+ (face-differs-from-default-p 'makefile-space-face)
(let* ((params (frame-parameters))
(light-bg (cdr (assq 'background-mode params)))
(bg-color (cond ((eq (cdr (assq 'display-type params)) 'mono)
(if light-bg "black" "white"))
((eq (cdr (assq 'display-type params)) 'grayscale)
(if light-bg "black" "white"))
- (light-bg ; Light color background.
+ (light-bg ; Light color background.
"hotpink")
- (t ; Dark color background.
+ (t ; Dark color background.
"hotpink"))))
(set-face-background 'makefile-space-face bg-color))))