From mboxrd@z Thu Jan  1 00:00:00 1970
Received: (from majordomo@localhost) by pauillac.inria.fr (8.7.6/8.7.3) id RAA27681; Sat, 24 Feb 2001 17:13:24 +0100 (MET)
X-Authentication-Warning: pauillac.inria.fr: majordomo set sender to owner-caml-list@pauillac.inria.fr using -f
Received: (from weis@localhost) by pauillac.inria.fr (8.7.6/8.7.3) id RAA27642 for caml-list@pauillac.inria.fr; Sat, 24 Feb 2001 17:13:08 +0100 (MET)
Received: from nez-perce.inria.fr (nez-perce.inria.fr [192.93.2.78]) by pauillac.inria.fr (8.7.6/8.7.3) with ESMTP id WAA06303 for <caml-list@pauillac.inria.fr>; Sun, 18 Feb 2001 22:19:06 +0100 (MET)
Received: from tomts5-srv.bellnexxia.net (tomts5.bellnexxia.net [209.226.175.25])
	by nez-perce.inria.fr (8.11.1/8.10.0) with ESMTP id f1ILIxT01002
	for <caml-list@inria.fr>; Sun, 18 Feb 2001 22:19:05 +0100 (MET)
Received: from holland.dynodns.net ([64.228.195.99])
          by tomts5-srv.bellnexxia.net
          (InterMail vM.4.01.03.16 201-229-121-116-20010115) with ESMTP
          id <20010218211854.IJLZ18941.tomts5-srv.bellnexxia.net@holland.dynodns.net>
          for <caml-list@inria.fr>; Sun, 18 Feb 2001 16:18:55 -0500
Received: from gmarceau by holland.dynodns.net with local (Exim 3.12 #1 (Debian))
	id 14UbGR-0004GD-00
	for <caml-list@inria.fr>; Sun, 18 Feb 2001 16:21:03 -0500
Date: Sun, 18 Feb 2001 16:18:15 -0500
From: Guillaume Marceau <gmarceau@cim.mcgill.ca>
To: gmarceau@nez-perce.inria.fr
Subject: [Caml-list] font-lock typo in caml-font.el [patch]
Reply-To: gmarceau@please.dont.spam.me.cim.mcgill.ca
Message-Id: <20010218211854.IJLZ18941.tomts5-srv.bellnexxia.net@holland.dynodns.net>
Sender: owner-caml-list@pauillac.inria.fr
Precedence: bulk


the 'end' keyword was being hilited in the middle of words. 
Particularly anoying for print_endline, so I fix it.

Here's the patch

*** /home/gmarceau/lisp/ocaml/caml-font.el	Sat Feb 17 23:03:27 2001
--- /usr/share/emacs/site-lisp/caml-font.el	Sat Feb 17 23:31:16 2001
***************
*** 54,60 ****
            "\\|v\\(al\\(ue\\)?\\|irtual\\)\\)\\>")
           'font-lock-type-face)
  ;blocking
!    '("\\<begin\\|end\\|object\\|s\\(ig\\|truct\\)\\>" . font-lock-keyword-face)
  ;control
     (cons (concat
            "\\<\\(do\\(ne\\|wnto\\)?\\|else\\|for\\|if"
--- 54,60 ----
            "\\|v\\(al\\(ue\\)?\\|irtual\\)\\)\\>")
           'font-lock-type-face)
  ;blocking
!    '("\\<\\(begin\\|end\\|object\\|s\\(ig\\|truct\\)\\)\\>" . font-lock-keyword-face)
  ;control
     (cons (concat
            "\\<\\(do\\(ne\\|wnto\\)?\\|else\\|for\\|if"

-- 
This is almost a sig, but not quite. Guillaume
-------------------
To unsubscribe, mail caml-list-request@inria.fr.  Archives: http://caml.inria.fr