From 220d5b6e727242b9650180fdf5fa3ac1d016c298 Mon Sep 17 00:00:00 2001
From: Leonardo Dias ~Lordie <levimanga@gmail.com>
Date: Wed, 2 Oct 2019 03:46:23 -0300
Subject: [PATCH] fixed regex for matching words

the regex for matching words was matching some characters that elm does not parse
added <_> and <->> as keywords
---
 rc/filetype/elm.kak | 16 +++++++---------
 1 file changed, 7 insertions(+), 9 deletions(-)

diff --git a/rc/filetype/elm.kak b/rc/filetype/elm.kak
index b8171127..0365c6e7 100644
--- a/rc/filetype/elm.kak
+++ b/rc/filetype/elm.kak
@@ -36,15 +36,13 @@ add-highlighter shared/elm/string        region         '"'     (?<!\\)(\\\\)*"
 add-highlighter shared/elm/line_comment  region         (--) $                        fill comment
 add-highlighter shared/elm/comment       region         -recurse \{- \{-   -\}        fill comment
 
-add-highlighter shared/elm/code/ regex (\b)+([A-Z]+[^\s]*)                                               0:type 
-add-highlighter shared/elm/code/ regex (\b)+([a-z]+[^\s]*)                                               0:variable
-add-highlighter shared/elm/code/ regex (^[a-z]+[^\s]*)                                                   0:function
-add-highlighter shared/elm/code/ regex "-?\b[0-9]*\.?[0-9]+"                                             0:value
-add-highlighter shared/elm/code/ regex \B(\+|\+\+|/|//|-|\*|=|==|&&|\|\||<\||\|>|->)\B                   0:operator
-add-highlighter shared/elm/code/ regex \b(import|exposing|as|module|where)\b                             0:meta
-add-highlighter shared/elm/code/ regex (\b(type|alias|if|then|else|case|of|let|in|infix|->)\b)|(\B(:)\B) 0:keyword
-
-
+add-highlighter shared/elm/code/ regex \b([A-Z]+[^\s]*)\b                                                  0:type 
+add-highlighter shared/elm/code/ regex \b([a-z]+[^\s]*)\b                                                  0:variable
+add-highlighter shared/elm/code/ regex \b(^[a-z]+[^\s]*)\b                                                 0:function
+add-highlighter shared/elm/code/ regex "-?\b[0-9]*\.?[0-9]+"                                               0:value
+add-highlighter shared/elm/code/ regex \B(\+|\+\+|\*|/|//|-|=|==|&&|\|\||<\||\|>)\B                        0:operator
+add-highlighter shared/elm/code/ regex \b(import|exposing|as|module|where)\b                               0:meta
+add-highlighter shared/elm/code/ regex (\b(type|alias|if|then|else|case|of|let|in|infix|_)\b)|(\B(->|:)\B) 0:keyword
 
 # Commands
 # ‾‾‾‾‾‾‾‾