Actually save the syntax context with the font lock hint

Not actually used currently, but will be useful later on.
hinrik · Oct 6, 2015 · ae9843c · ae9843c
1 parent c5f3d07
commit ae9843c
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/perl6-font-lock.el b/perl6-font-lock.el
@@ -412,7 +412,7 @@ OPEN-ANGLES is the opening delimiter (e.g. \"«\" or \"<<\")."
 
 (defun perl6-add-font-lock-hint (property &optional group)
   (let ((beg (match-beginning (or group 1)))
-        context)
+        (context (perl6-syntax-context)))
     (put-text-property beg (1+ beg) property
                        (cons context (match-data)))))