Dispatch with symbol won't break parens

Author: Invertisment

clj/test/vim/syntax_test.clj

@@ -29,7 +29,27 @@
                                          :clojureKeyword])
 (def-eq-predicates kwWithNamedNs [:clojureKeywordNsColon :clojureKeywordNsColon
                                   :clojureKeywordNs :clojureKeywordNsSeparator :clojureKeyword])
-
+(def-eq-predicates dispatchWithSymbolInside [:clojureDispatch
+                                             :clojureSymbol
+                                             :clojureSymbol
+                                             :clojureSymbol
+                                             :clojureSymbol
+                                             :clojureSymbol
+                                             :clojureSymbol
+                                             :clojureSymbol
+                                             :clojureSymbol
+                                             :clojureParen
+                                             :clojureSymbolNs
+                                             :clojureSymbolNs
+                                             :clojureSymbolNs
+                                             :clojureSymbolNs
+                                             :clojureSymbolNsSeparator
+                                             :clojureSymbol
+                                             :clojureSymbol
+                                             :clojureSymbol
+                                             :clojureSymbol
+                                             :clojureSymbol
+                                             :clojureParen])
 (defpredicates character :clojureCharacter)
 (defpredicates regexp :clojureRegexp)
 (defpredicates regexp-delimiter :clojureRegexpDelimiter)
@@ -173,7 +193,8 @@
     "a:" !symWithNs
     "a/" !sym
     "a/" !symWithNs
-    "/" !sym]])
+    "/" !sym
+    "#function[test/hello]" dispatchWithSymbolInside]])
 
 (comment (test #'keywords-test))
 

syntax/clojure.vim

@@ -79,7 +79,7 @@ syntax region clojureString matchgroup=clojureStringDelimiter start=/"/ skip=/\\
 
 syntax match clojureCharacter "\v\\%(o%([0-3]\o{2}|\o{1,2})|u\x{4}|newline|tab|space|return|backspace|formfeed|.)"
 
-syntax match clojureSymbolNs contained "\v[^/ ]+\ze/"
+syntax match clojureSymbolNs contained "\v[^/\[ ]+\ze/"
 syntax match clojureSymbolNsSeparator contained "/"
 syntax match clojureSymbol "\v%([a-zA-Z!$&*_+=|<.>?-]|[^\x00-\x7F])+%(:?%([a-zA-Z0-9!#$%&*_+=|'<.>/?-]|[^\x00-\x7F]))*[#:]@1<!" contains=clojureSymbolNs,clojureSymbolNsSeparator