Merge pull request #13 from anaxagoras/master

[p5sagit/Try-Tiny.git] / t / named.t

diff --git a/t/named.t b/t/named.t
index 7d31c88..32fb83c 100644 (file)
--- a/t/named.t
+++ b/t/named.t
@@ -17,7 +17,7 @@ my $name;
 try {
        $name = (caller(0))[3];
 };
-is $name, "main::try {...}", "try name";
+is $name, "main::try {...} ", "try name"; # note extra space
 
 try {
        die "Boom";