Make test robust in the face of Windows newlines.

Raku · Jan 5, 2015 · d3ec728 · d3ec728
1 parent 0aee8d1
commit d3ec728
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/S05-metasyntax/longest-alternative.t b/S05-metasyntax/longest-alternative.t
@@ -294,7 +294,7 @@ my $str = 'a' x 7;
 
     my $m = IETF::RFC_Grammar::URI.subparse('http://example.com:80/about/us?foo#bar');
     ok $m, "IETF::RFC_Grammar::URI matches";
-    is $m.gist, q:to/END/, "IETF::RFC_Grammar::URI gets ltm and longlit right";
+    is $m.gist, q:to/END/.subst("\r", "", :g), "IETF::RFC_Grammar::URI gets ltm and longlit right";
         ｢http://example.com:80/about/us?foo#bar｣
          URI_reference => ｢http://example.com:80/about/us?foo#bar｣
           URI => ｢http://example.com:80/about/us?foo#bar｣