different font-lock faces for different modes

different font-lock faces for different modes

[Christopher C. Stacy]

I want to change the face used for comments,
depending on which mode (language) I am in.

I'm already doing something like this:

(custom-set-faces
 '(font-lock-comment-face
     ((t ( :foreground "red")))))

For example, in C, I want keywords to be colored in red,
and in Lisp, I want keywords to be colored as blue.
How can I do that?

Re: different font-lock faces for different modes

[Joe Corneli]

Sketch:

  Make a variable that hold the alternate definition of the face you
want to use.  Add to your `lisp-mode-hook' a function to set the
buffer-local value of `font-lock-comment-face' to the value of that
variable.

Details:

 (setq ugly-face '((t ( :foreground "blue"))))

 (add-hook 'lisp-mode-hook 
           (lambda () (make-local-variable font-lock-comment-face)
                      (setq font-lock-comment-face ugly-face)))

 ;; Yep, it works.

If for some ungodly reason you desire to switch between lisp mode and
C mode in the same buffer, you will have to continue slightly further
in the same vein.

Re: different font-lock faces for different modes

[Kevin Rodgers]

Joe Corneli wrote:
 >  (add-hook 'lisp-mode-hook
 >            (lambda () (make-local-variable font-lock-comment-face)
 >                       (setq font-lock-comment-face ugly-face)))

That can be simplified just a bit:

(add-hook 'lisp-mode-hook
           (lambda ()
             (set (make-local-variable font-lock-comment-face) ugly-face)))

-- 
Kevin Rodgers

Re: different font-lock faces for different modes

[Stefan Monnier]

> (add-hook 'lisp-mode-hook
>            (lambda ()
>              (set (make-local-variable font-lock-comment-face) ugly-face)))
                                        ^^^
                                         '

And there was probably a quote missing in front of `ugly-face' as well.


        Stefan