[nongnu] elpa/raku-mode c93daf2353 096/253: Avoid highlighting X::Foo and X:: as cross-metaoperators

[ELPA Syncer]

branch: elpa/raku-mode
commit c93daf235313f4388949449b6ab589c65eb587ca
Author: Hinrik Örn Sigurðsson <hinrik.sig@gmail.com>
Commit: Hinrik Örn Sigurðsson <hinrik.sig@gmail.com>

    Avoid highlighting X::Foo and X:: as cross-metaoperators
---
 perl6-font-lock.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/perl6-font-lock.el b/perl6-font-lock.el
index e080fedf8d..dbe0ba4c39 100644
--- a/perl6-font-lock.el
+++ b/perl6-font-lock.el
@@ -382,8 +382,8 @@ Takes arguments START and END which delimit the region to 
propertize."
       ((rx (regex "[_[:alnum:]]") (group (any "-'")) (regex "[_[:alpha:]]"))
        (1 "_"))
       ;; same for "::" around identifiers
-      ((rx (or (and "::" symbol-start)
-               (and symbol-end "::")))
+      ((perl6-rx (or (and (opt identifier) "::" symbol-start)
+                     (and identifier "::")))
        (0 "_"))
       ((rx "#" (any "`|="))
        (0 (ignore (perl6-syntax-propertize-embedded-comment))))