7277a3d24736 — Pranshu Sharma 4 months ago 
Fixed array + hash highlighting

Now ressembles cperl mode entirly
patch browse 
1 files changed, 4 insertions(+), 5 deletions(-)

M perl-ts-mode.el

M perl-ts-mode.el +4 -5
@@ 276,15 276,14 @@ Argument STR is either a string, or a li
      (localization_expression (scalar) @font-lock-variable-name-face))
    :language 'perl
    :feature 'array
-   :override t
-   '((array) @cperl-array-face
+   :override 'keep
+   '((arraylen) @cperl-array-face
      (hash_element_expression
       (container_variable) @cperl-hash-face)
      (array_element_expression
       (container_variable) @cperl-array-face)
-     (hash
-      "%" @cperl-hash-face
-      (varname) @perl-ts-highlight-hash)
+     (hash_element_expression hash: (_)
+			      @cperl-hash-face)
      (slice_container_variable) @cperl-hash-face
      (arraylen) @cperl-array-face)
    :language 'perl