[elpa] externals/bnf-mode 65bfadc 65/74: Fixed orthodox comments regexp

[Stefan Monnier]

branch: externals/bnf-mode
commit 65bfadc9534f7a64e79ea504a15f1c0afe3c6380
Author: Serghei Iakovlev <address@hidden>
Commit: Serghei Iakovlev <address@hidden>

    Fixed orthodox comments regexp
---
 bnf-mode.el | 7 +++----
 1 file changed, 3 insertions(+), 4 deletions(-)

diff --git a/bnf-mode.el b/bnf-mode.el
index 0637dfa..a16739f 100644
--- a/bnf-mode.el
+++ b/bnf-mode.el
@@ -234,11 +234,10 @@ Currently handled:
 
 (defconst bnf--bnf-syntax-propertize-macro
   (syntax-propertize-rules
-   
("\\(?:begin\\_>\\|;\\)\\(?:$\\|\\s-\\|\n\\)+\\(\\(?:comment\\_>\\)[^;]*;\\)"
-    (1 "<")))
+   ("\\(?:begin\\s-+\\|;\\s-*\\)\\(comment\\)\\(;\\|\\s-+[^;]*;\\)" (1 "<")))
   "Fontify comments in ALGOL 60 style.
 Provide a macro to apply syntax table properties to comments in ALGOL 60 style.
-Will used only if `bnf-mode-algol-commets-style' is set to t")
+Will be used only if `bnf-mode-algol-commets-style' is set to t")
 
 ;;;###autoload
 (define-derived-mode bnf-mode prog-mode "BNF"
@@ -252,7 +251,7 @@ Will used only if `bnf-mode-algol-commets-style' is set to 
t")
       (progn
         (setq-local comment-start "; comment ")
         (setq-local comment-end ";")
-        (setq-local comment-start-skip "\\(?:\\(\\W\\|^\\)comment\\_>\\)\\s-+")
+        (setq-local comment-start-skip "\\(?:\\(\\W\\|^\\)comment\\)\\s-+")
         (setq-local syntax-propertize-function
                     bnf--bnf-syntax-propertize-macro))
     (progn