Improve matching of '«' and '<' strings

'«<«' is not a delimiter of such strings, for instance.
hinrik · Oct 9, 2015 · a2cc73f · a2cc73f
1 parent 86c5f98
commit a2cc73f
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/perl6-font-lock.el b/perl6-font-lock.el
@@ -436,7 +436,7 @@ Takes arguments START and END which delimit the region to propertize."
       ((rx "#")
        (0 (ignore (perl6-syntax-propertize-comment end))))
       ;; angle-bracketed quoting construct
-      ((rx (1+ (char "<«")))
+      ((rx (or (1+ "<") (1+ "«")))
        (0 (ignore (perl6-syntax-propertize-angles (match-string 0)))))
       ;; postfix hyper operators
       ((perl6-rx (or identifier "]" ")") (group (or "»" ">>")))