Perl: Support the new syntax of function declarations (#246)

jacktasia · Nov 29, 2018 · bb888a8 · bb888a8
1 parent 720cf1f
commit bb888a8
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/dumb-jump.el b/dumb-jump.el
@@ -624,8 +624,8 @@ or most optimal searcher."
 
     ;; perl
     (:type "function" :supports ("ag" "grep" "rg" "git-grep") :language "perl"
-           :regex "sub\\s*JJJ\\s*\\\{"
-           :tests ("sub test{" "sub test {"))
+           :regex "sub\\s*JJJ\\s*(\\{|\\()"
+           :tests ("sub test{" "sub test {" "sub test(" "sub test ("))
 
     (:type "variable" :supports ("ag" "grep" "rg" "git-grep") :language "perl"
            :regex "JJJ\\s*=\\s*"