branch: elpa/raku-mode commit 2b5f69ade1c8ed38eed9d1a0b9fe6af8f3d10d67 Author: Hinrik Örn Sigurðsson <hinrik....@gmail.com> Commit: Hinrik Örn Sigurðsson <hinrik....@gmail.com>
Fix highlighting of some non-alphanumberic RSXZ metaops, like C«R<» --- perl6-font-lock.el | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/perl6-font-lock.el b/perl6-font-lock.el index 754f6b301c..242bb735d5 100644 --- a/perl6-font-lock.el +++ b/perl6-font-lock.el @@ -162,14 +162,14 @@ . ,(rx symbol-start (any "RSXZ") - (or symbol-end - (or (and (or "div" "mod" "gcd" "lcm" "xx" "x" "does" "but" "cmp" + (or (or (and (or "div" "mod" "gcd" "lcm" "xx" "x" "does" "but" "cmp" "leg" "eq" "ne" "gt" "ge" "lt" "le" "before" "after" "eqv" "min" "max" "not" "so" "andthen" "and" "or" "orelse") symbol-end) (any ".,") - (1+ (regex "[^:\[.,[:space:][:alnum:]]")))))) + (1+ (regex "[^:\[.,[:space:][:alnum:]]"))) + symbol-end))) (reduce-operator . ,(rx (0+ (any "RSXZ\[")) (opt (any "RSXZ&"))