[libmoosex-lazyrequire-perl] 04/11: tests now have names

Intrigeri intrigeri at moszumanska.debian.org
Wed Aug 27 21:25:24 UTC 2014


This is an automated email from the git hooks/post-receive script.

intrigeri pushed a commit to annotated tag v0.09
in repository libmoosex-lazyrequire-perl.

commit fb12b8dc1ac7c8768c67b333205d386533d74bcd
Author: Karen Etheridge <ether at cpan.org>
Date:   Sat Dec 1 13:05:29 2012 -0800

    tests now have names
---
 t/basic.t | 11 ++++++++---
 1 file changed, 8 insertions(+), 3 deletions(-)

diff --git a/t/basic.t b/t/basic.t
index dd52535..84e3c5a 100644
--- a/t/basic.t
+++ b/t/basic.t
@@ -35,6 +35,7 @@ use Test::Fatal;
     is(
         exception { $foo = Foo->new(baz => 23) },
         undef,
+        'can set other attr explicitly without interfering',
     );
     is($foo->baz, 23);
 }
@@ -69,6 +70,7 @@ like(
     like(
         exception { $bar->baz },
         qr/must be provided/,
+        'lazy_required dependency is not satisfied',
     );
 
     $bar->foo(42);
@@ -77,9 +79,10 @@ like(
     is(
         exception { $baz = $bar->baz },
         undef,
+        'lazy_required dependency is satisfied',
     );
 
-    is($baz, 43);
+    is($baz, 43, 'builder uses correct value');
 }
 
 SKIP:
@@ -118,6 +121,7 @@ SKIP:
     like(
         exception { $bar->baz },
         qr/must be provided/,
+        'lazy_required dependency is not satisfied (in a role)',
     );
 
     $bar->foo(42);
@@ -126,9 +130,10 @@ SKIP:
     is(
         exception { $baz = $bar->baz },
         undef,
-);
+        'lazy_required dependency is satisfied (in a role)',
+    );
 
-    is($baz, 43);
+    is($baz, 43, 'builder uses correct value (in a role)');
 }
 }
 

-- 
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/libmoosex-lazyrequire-perl.git



More information about the Pkg-perl-cvs-commits mailing list