Don't let the feedback on a failed test explode

rakudo · Jul 10, 2015 · fadca9d · fadca9d
1 parent ae32e12
commit fadca9d
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/lib/Test.pm b/lib/Test.pm
@@ -134,7 +134,7 @@ multi sub is(Mu $got, Mu:D $expected, $desc = '') is export {
         my $test = $got eq $expected;
         $ok = proclaim(?$test, $desc);
         if !$test {
-            if [eq] ($got, $expected)>>.Str>>.subst(/\s/, '', :g) {
+            if try [eq] ($got, $expected)>>.Str>>.subst(/\s/, '', :g) {
                 # only white space differs, so better show it to the user
                 diag "expected: {$expected.perl}";
                 diag "     got: {$got.perl}";