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"
