[nongnu] externals/caml 55eef02 032/197: wrong regexp

[Stefan Monnier]

branch: externals/caml
commit 55eef0219338ee90597125370121f55492c9a58e
Author: Jacques Garrigue <garrigue at math.nagoya-u.ac.jp>
Commit: Jacques Garrigue <garrigue at math.nagoya-u.ac.jp>

    wrong regexp
    
    
    git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@3147 
f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
---
 caml-font.el  | 3 ++-
 caml-hilit.el | 3 +--
 2 files changed, 3 insertions(+), 3 deletions(-)

diff --git a/caml-font.el b/caml-font.el
index 3e8b5d2..7cf780a 100644
--- a/caml-font.el
+++ b/caml-font.el
@@ -54,7 +54,8 @@
           "\\|v\\(al\\(ue\\)?\\|irtual\\)\\)\\>")
          'font-lock-type-face)
 ;blocking
-   '("\\<begin\\|end\\|object\\|s\\(ig\\|truct\\)\\>" . font-lock-keyword-face)
+   '("\\<\\(begin\\|end\\|object\\|s\\(ig\\|truct\\)\\)\\>"
+     . font-lock-keyword-face)
 ;control
    (cons (concat
           "\\<\\(do\\(ne\\|wnto\\)?\\|else\\|for\\|if"
diff --git a/caml-hilit.el b/caml-hilit.el
index 4ec631c..72cc814 100644
--- a/caml-hilit.el
+++ b/caml-hilit.el
@@ -30,8 +30,7 @@
           "\\|v\\(al\\(ue\\)?\\|irtual\\)\\)\\>")
          nil 'ForestGreen)
 ;blocking
-   '("\\(\\<\\|:\\)\\(object\\|struct\\|sig\\|begin\\|end\\)\\>"
-     2 include)
+   '("\\<\\(object\\|struct\\|sig\\|begin\\|end\\)\\>" 2 include)
 ;control
    (list (concat
           "\\<\\(do\\(ne\\|wnto\\)?\\|else\\|for\\|if"