From a91eeef7dd5bd1b106a5d4ecc81450c3bc85aafd Mon Sep 17 00:00:00 2001
From: Samantha McVey <samantham@posteo.net>
Date: Thu, 29 Dec 2016 11:54:50 -0800
Subject: [PATCH] Fix highlighting breaking when using `/` with another `/` on
 the line

Make sure we look back one more character to make sure it's not a number
or a letter.
Needs tests.
Fixes issue #34
---
 grammars/perl6fe.cson | 12 ++++++++----
 1 file changed, 8 insertions(+), 4 deletions(-)

diff --git a/grammars/perl6fe.cson b/grammars/perl6fe.cson
index aa7a585..cd39601 100644
--- a/grammars/perl6fe.cson
+++ b/grammars/perl6fe.cson
@@ -446,10 +446,14 @@
   # paren
   {
     'match': '''(?x)
-    (?<= ^|[\\s\\(] )
-    ([/]) # Solidus
-    (.*?) # Regex contents
-    (?: (?<!\\\\)|(?<=\\\\\\\\) ) (/) # Ending
+        (?<=
+          ^
+         | ^\\s
+         | [\\s\\(] [^\\p{Nd}\\p{L}]
+        )
+        ([/]) # Solidus
+        (.*?) # Regex contents
+        (?: (?<!\\\\)|(?<=\\\\\\\\) ) (/) # Ending
     '''
     'captures':
       '1': 'name': 'punctuation.definition.regexp.perl6fe'