branch: elpa/raku-mode
commit 2b5f69ade1c8ed38eed9d1a0b9fe6af8f3d10d67
Author: Hinrik Örn Sigurðsson <[email protected]>
Commit: Hinrik Örn Sigurðsson <[email protected]>
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&"))