branch: elpa/raku-mode commit 95f6ca837c80693735c70448006aee5f67bf77b3 Author: Hinrik Örn Sigurðsson <hinrik....@gmail.com> Commit: Hinrik Örn Sigurðsson <hinrik....@gmail.com>
Highlight sigil in match group ($<foo>) --- perl6-font-lock.el | 7 +++++-- 1 file changed, 5 insertions(+), 2 deletions(-) diff --git a/perl6-font-lock.el b/perl6-font-lock.el index f6a1d163ba..f060a17af7 100644 --- a/perl6-font-lock.el +++ b/perl6-font-lock.el @@ -452,8 +452,11 @@ GROUPS is allowed to reference optional match groups." (defconst perl6-font-lock-keywords `( (perl6-match-metaoperator 0 'perl6-operator) - (,(perl6-rx (group (any "@$%&")) (0+ space) - (or (any ",\)\}") (symbol "where"))) + (,(perl6-rx (group (any "@$%&")) + (or + "<" + (and (0+ space) + (or (any ",\)\}") (symbol "where"))))) 1 'perl6-sigil) (,(perl6-rx (group (1+ (char "@$%&"))) (group (opt (char ".^*?=!~")))