From owner-ntemacs-users@june  Thu Apr 11 13:11:58 1996
X-VM-v5-Data: ([nil nil nil nil nil nil nil nil nil]
	[nil "Thu" "11" "April" "1996" "11:09:27" "-0700" "Fred Kunz" "kunz@bsquare.com" nil "45" "RE: Problem with font-lock" "^From:" nil nil "4" nil nil nil nil]
	nil)
Received: from joker.cs.washington.edu (joker.cs.washington.edu [128.95.1.42]) by june.cs.washington.edu (8.7.2/7.2ju) with SMTP id NAA08146 for <voelker@june.cs.washington.edu>; Thu, 11 Apr 1996 13:11:58 -0700
Received: from june.cs.washington.edu (june.cs.washington.edu [128.95.1.4]) by joker.cs.washington.edu (8.6.12/7.2ws+) with ESMTP id NAA29160 for <voelker@joker.cs.washington.edu>; Thu, 11 Apr 1996 13:11:56 -0700
Received: from big.aa.net (big.aa.net [204.157.220.2]) by june.cs.washington.edu (8.7.2/7.2ju) with SMTP id LAA22702; Thu, 11 Apr 1996 11:09:53 -0700
Received: from SQUIRE (s1c1p7.aa.net [204.157.220.179]) by big.aa.net (8.6.12/8.6.9) with SMTP id LAA12789; Thu, 11 Apr 1996 11:10:00 -0700
Received: by SQUIRE with Microsoft Mail 	id <01BB2797.5BAB0460@SQUIRE>; Thu, 11 Apr 1996 11:09:31 -0700
Message-ID: <01BB2797.5BAB0460@SQUIRE>
Encoding: 45 TEXT
From: Fred Kunz <kunz@bsquare.com>
To: "cmcmahan@Teknowledge.COM" <cmcmahan@Teknowledge.COM>,         "'Geoff Voelker'" 	 <voelker@cs.washington.edu>
Cc: "ntemacs-users@cs.washington.edu" <ntemacs-users@cs.washington.edu>
Subject: RE: Problem with font-lock
Date: Thu, 11 Apr 1996 11:09:27 -0700

This is the way I set these up.  Please see font-lock.el.

	 (setq font-lock-face-attributes 
	       (list
		'(font-lock-comment-face "Yellow")
		'(font-lock-string-face "Brown")
		'(font-lock-keyword-face "OrangeRed")
		'(font-lock-function-name-face "MediumVioletRed")
		'(font-lock-variable-name-face "Goldenrod")
		'(font-lock-type-face "Gold")
		'(font-lock-referenct-face "MediumBlue")))



----------
From: 	Geoff Voelker[SMTP:voelker@cs.washington.edu]
Sent: 	Wednesday, April 10, 1996 8:37 PM
To: 	cmcmahan@Teknowledge.COM
Cc: 	ntemacs-users@cs.washington.edu
Subject: 	Re: Problem with font-lock

> I am getting an error on startup that says:
> 
> Error in init file: Wrong type argument: internal-facep, font-lock-comment-face
> 
> I believe I am initializing font lock correctly (it works in my .emacs
> when using XEmacs 19.13), but it fails on the emacs.

I'm not exactly sure what the problem is, but I suspect that the code
doesn't port directly from XEmacs.  I also tried your file out on
the unix version, and encountered the same error as on NT.  The error
occured when evaluating the following commands:

> (set-face-foreground 'font-lock-comment-face        "dark red")
> (set-face-foreground 'font-lock-keyword-face        "blue")
> (set-face-foreground 'font-lock-string-face         "dark green")
> (set-face-foreground 'font-lock-variable-name-face  "blue")
> (set-face-foreground 'font-lock-function-name-face  "blue")

These faces seem to be defined in font-lock.el, but I didn't look into
it any further so I don't know what the cause is.

-geoff



From owner-ntemacs-users@june  Sat Aug 31 15:08:12 1996
X-VM-v5-Data: ([nil nil nil nil nil nil nil nil nil]
	[nil "Sat" "31" "August" "1996" "15:32:37" "-0600" "MASSE MARK STEPHEN" "masse@nag.cs.colorado.edu" nil "31" "Re: colors and fonts" "^From:" nil nil "8" nil nil nil nil]
	nil)
Received: from joker.cs.washington.edu (joker.cs.washington.edu [128.95.1.42]) by june.cs.washington.edu (8.7.5/7.2ju) with SMTP id PAA03811 for <voelker@june.cs.washington.edu>; Sat, 31 Aug 1996 15:08:12 -0700
Received: from june.cs.washington.edu (june.cs.washington.edu [128.95.1.4]) by joker.cs.washington.edu (8.6.12/7.2ws+) with ESMTP id PAA35703 for <voelker@joker.cs.washington.edu>; Sat, 31 Aug 1996 15:08:10 -0700
Received: from nag.cs.colorado.edu (nag.cs.Colorado.EDU [128.138.250.20]) by june.cs.washington.edu (8.7.5/7.2ju) with SMTP id OAA02562 for <ntemacs-users@cs.washington.edu>; Sat, 31 Aug 1996 14:32:50 -0700
Received: (from masse@localhost) by nag.cs.colorado.edu (8.6.10/8.6.10) id PAA12108; Sat, 31 Aug 1996 15:32:44 -0600
In-Reply-To: <199608302215.PAA35751@joker.cs.washington.edu>
Message-ID: <Pine.HPP.3.91.960831152755.10705C-100000@nag.cs.colorado.edu>
MIME-Version: 1.0
Content-Type: TEXT/PLAIN; charset=US-ASCII
From: MASSE  MARK STEPHEN <masse@nag.cs.colorado.edu>
To: reesor@virtualvin.com, ntemacs-users@cs.washington.edu
Subject: Re: colors and fonts
Date: Sat, 31 Aug 1996 15:32:37 -0600 (MDT)

> Hi,
> 
> I'm new to emacs on NT 4.0 beta 2 and to this list, so my advance apologies if
> this one's been seen a zillion times.
> 
> I've been using XEmacs on SGI and like the fact that fontification and
> colorization happens dynamically. On NT, I seem to have to fontify the buffer
> to get this to happen. Can this be changed?
> 
> Thanks,
> Rob

Hello,

  Here is a little hack that works well for me:

	;; Fontify buffer with mode, when file is opened
	(add-hook 'find-file-hooks 'font-lock-mode)

  and I also like:

	(setq font-lock-maximum-decoration t)

-Mark

***********************************************************************
Mark Masse                                       Undergraduate Student
                                        Department of Computer Science
masse@nag.cs.colorado.edu                       University of Colorado  
http://www-ugrad.cs.colorado.edu/~masse                    Boulder, CO
***********************************************************************

From owner-ntemacs-users@june  Mon Sep  2 11:47:29 1996
X-VM-v5-Data: ([nil nil nil nil nil nil nil nil nil]
	[nil "Mon" " 2" "September" "1996" "11:06:45" "-0700" "Darin Johnson" "djohnso@condor.peregrine.com" nil "4" "Re: colors and fonts" "^From:" nil nil "9" nil nil nil nil]
	nil)
Received: from joker.cs.washington.edu (joker.cs.washington.edu [128.95.1.42]) by june.cs.washington.edu (8.7.5/7.2ju) with SMTP id LAA11602 for <voelker@june.cs.washington.edu>; Mon, 2 Sep 1996 11:47:28 -0700
Received: from june.cs.washington.edu (june.cs.washington.edu [128.95.1.4]) by joker.cs.washington.edu (8.6.12/7.2ws+) with ESMTP id LAA36037 for <voelker@joker.cs.washington.edu>; Mon, 2 Sep 1996 11:47:28 -0700
Received: from condor (condor.peregrine.com [192.72.253.98]) by june.cs.washington.edu (8.7.5/7.2ju) with SMTP id LAA09138 for <ntemacs-users@cs.washington.edu>; Mon, 2 Sep 1996 11:13:06 -0700
Received: from hp800.peregrine.com by condor (5.x/SMI-SVR4) 	id AA15274; Mon, 2 Sep 1996 11:11:02 -0700
Message-Id: <9609021811.AA15274@condor>
Received: by hp800.peregrine.com 	(1.38.193.4/16.2) id AA11187; Mon, 2 Sep 96 11:06:45 -0700
In-Reply-To: <Pine.HPP.3.91.960831152755.10705C-100000@nag.cs.colorado.edu>
References: <199608302215.PAA35751@joker.cs.washington.edu> 	<Pine.HPP.3.91.960831152755.10705C-100000@nag.cs.colorado.edu>
From: Darin Johnson <djohnso@condor.peregrine.com>
To: ntemacs-users@cs.washington.edu
Subject: Re: colors and fonts
Date: Mon, 2 Sep 96 11:06:45 -0700

 > 	;; Fontify buffer with mode, when file is opened
 > 	(add-hook 'find-file-hooks 'font-lock-mode)

There's also (global-font-lock-mode t) which should do the same thing.

From owner-ntemacs-users@june  Fri Jun 28 08:20:55 1996
X-VM-v5-Data: ([nil nil nil nil nil nil nil nil nil]
	[nil "Fri" "28" "June" "1996" "07:35:00" "-0700" "John Vella" "john_vella@mentorg.com" nil "47" "Finally got font-lock to work with VM...Here's how!" "^From:" nil nil "6" nil nil nil nil]
	nil)
Received: from joker.cs.washington.edu (joker.cs.washington.edu [128.95.1.42]) by june.cs.washington.edu (8.7.5/7.2ju) with SMTP id IAA24447 for <voelker@june.cs.washington.edu>; Fri, 28 Jun 1996 08:20:55 -0700
Received: from june.cs.washington.edu (june.cs.washington.edu [128.95.1.4]) by joker.cs.washington.edu (8.6.12/7.2ws+) with ESMTP id IAA31456 for <voelker@joker.cs.washington.edu>; Fri, 28 Jun 1996 08:20:54 -0700
Received: from newsgw.mentorg.com (newsgw.mentorg.com [137.202.128.5]) by june.cs.washington.edu (8.7.5/7.2ju) with SMTP id HAA21328 for <ntemacs-users@cs.washington.edu>; Fri, 28 Jun 1996 07:34:49 -0700
Received: from wv.wv.mentorg.com by newsgw.mentorg.com (8.6.8.1/CF5.22R) 	id HAA00591; Fri, 28 Jun 1996 07:34:47 -0700
Received: from em-wv03.wv.mentorg.com by wv.wv.mentorg.com (8.6.8.1/CF5.22R) 	id HAA25272; Fri, 28 Jun 1996 07:34:46 -0700
Received: from bullbert.wv.mentorg.com by em-wv03.wv.mentorg.com (8.6.8.1/CF5.23H) 	id HAA22075; Fri, 28 Jun 1996 07:35:00 -0700
Message-Id: <199606281435.HAA22075@em-wv03.wv.mentorg.com>
From: John Vella <john_vella@MENTORG.COM>
To: ntemacs-users@cs.washington.edu
Subject: Finally got font-lock to work with VM...Here's how!
Date: Fri, 28 Jun 1996 07:35:00 -0700


This is from my .emacs file.

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
;;------------------------------------------------------------
;;
;; Font lock settings
;;
;;------------------------------------------------------------
;;
(require 'font-lock)

(global-font-lock-mode t)
;; For some reason, the "global" doesn't work for VM buffers
(add-hook 'vm-mode-hook         'turn-on-font-lock)
(add-hook 'vm-summary-mode-hook 'turn-on-font-lock)

;; Faces & Keywords for VM
(make-face 'vm-summ-hilite-face)
(set-face-background 'vm-summ-hilite-face "Orange")
(set-face-foreground 'vm-summ-hilite-face "Black")
(setq vm-summary-highlight-face 'vm-summ-hilite-face)
(setq vm-font-lock-keywords
      (list '("^From:.*"                                 . font-lock-comment-face)
            '("^To:.*"                                   . font-lock-function-name-face)
            '("^[BF]*C[cC]:.*\\|^***Reply-To:.*"         . font-lock-doc-string-face)
            '("^Subject:.*"                              . font-lock-keyword-face)
            '("^[ ]*>.*"                                 . font-lock-reference-face)
            '("^\\(X-[A-Za-z0-9-]+\\|In-reply-to\\):.*$" . font-lock-type-face)))

;; Highlight my name and subject lines(threaded subjects are hilited differently)
(setq vm-summary-font-lock-keywords
      (list '("|> [^ ].*"  . font-lock-function-name-face)
            '("|>   .*"    . font-lock-comment-face)
            '("John Vella\\|jvella" . font-lock-keyword-face)))

;; Got the next two lines from Kyle Jones on 6-20-96.
;; Without them there just wasn't a way to get font-lock turned on.
(setq font-lock-defaults-alist 
      (cons (list 'vm-summary-mode 'vm-summary-font-lock-keywords nil nil nil nil)
            font-lock-defaults-alist))
(setq font-lock-defaults-alist 
      (cons (list 'vm-mode 'vm-font-lock-keywords nil nil nil nil)
            font-lock-defaults-alist))
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

-john

