[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