From: Graham Knop <haarg@haarg.org>
Date: Mon, 24 Feb 2014 00:03:59 +0000 (-0500)
Subject: clean up test output for long package names
X-Git-Tag: v1.003003~25
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=33f7a80284d6a5a181c164c14855da4d726b3863;p=gitmo%2FRole-Tiny.git

clean up test output for long package names
---

diff --git a/t/role-long-package-name.t b/t/role-long-package-name.t
index a103498..811758c 100644
--- a/t/role-long-package-name.t
+++ b/t/role-long-package-name.t
@@ -35,8 +35,8 @@ for (qw(
 }
 
 my $pkg = ref $foo;
-note $pkg;
 eval "package $pkg;";
-ok(!$@) or diag $@;
+is $@, '', 'package name usable by perl'
+  or diag "package: $pkg";
 
 done_testing;