Merge pull request #5 from perl6/multiunsp

Allow multiple unspaces in sequence
perl6 · Aug 28, 2013 · 83f92a5 · 83f92a5
2 parents 06636e4 + d699c5f
commit 83f92a5
Showing 1 changed file with 8 additions and 6 deletions.
diff --git a/STD.pm6 b/STD.pm6
@@ -637,13 +637,15 @@ token ws {
 }
 
 token unsp {
-    \\ <?before [\s|'#'] >
-    :dba('unspace')
     [
-    | <.vws>
-    | <.unv>
-    | $ { $¢.moreinput }
-    ]*
+        \\ <?before [\s|'#'] >
+        :dba('unspace')
+        [
+        | <.vws>
+        | <.unv>
+        | $ { $¢.moreinput }
+        ]*
+    ]+
 }
 
 token vws {