branch: elpa/raku-mode
commit 5b47a0b1a2c3f435c9234cc5dc1b54d044f5a633
Author: Hinrik Örn Sigurðsson <[email protected]>
Commit: Hinrik Örn Sigurðsson <[email protected]>
Deal with [-'] preceded by a non-ASII identifier character
Meant to do this in 4556ff4.
---
perl6-font-lock.el | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/perl6-font-lock.el b/perl6-font-lock.el
index ab7cfbb8f5..aeb5d6e3be 100644
--- a/perl6-font-lock.el
+++ b/perl6-font-lock.el
@@ -292,7 +292,7 @@ Takes arguments START and END which delimit the region to
propertize."
(funcall
(syntax-propertize-rules
;; [-'] between identifiers are symbol chars
- ((rx (any "A-Za-z0-9") (group (any "-'")) (any "A-Za-z"))
+ ((rx alnum (group (any "-'")) alpha)
(1 "_"))
;; same for "::" around identifiers
((rx (or (and "::" symbol-start)
