X-Git-Url: http://git.shiar.net/perl/plp/.git/blobdiff_plain/50d3d2e4e78263d8741706541afafd58f80167fe..fe22802045bae19ea53858a20b4752eb9e9bcac8:/lib/Test/PLP.pm?ds=sidebyside diff --git a/lib/Test/PLP.pm b/lib/Test/PLP.pm index 04bfe2e..519faca 100644 --- a/lib/Test/PLP.pm +++ b/lib/Test/PLP.pm @@ -101,7 +101,8 @@ sub plp_is { return is_string($output, $expect, $name); } - return $tb->ok(defined $output, $name); + $tb->ok(defined $output, $name); + return $output; } sub _getwarning {