projects
/
p5sagit/Devel-Declare.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
add strict and warnings
[p5sagit/Devel-Declare.git]
/
t
/
ctx-simple.t
diff --git
a/t/ctx-simple.t
b/t/ctx-simple.t
index
7b1b888
..
70cf470
100644
(file)
--- a/
t/ctx-simple.t
+++ b/
t/ctx-simple.t
@@
-1,3
+1,5
@@
+use strict;
+use warnings;
use Devel::Declare ();
{
@@
-131,7
+133,7
@@
my ($test_method1, $test_method2, @test_list);
}
-use Test::More 'no_plan';
+use Test::More;
my $o = DeclareTest->new(attr => "value");
@@
-171,3
+173,4
@@
is($o->$test_method2('this'), 'DeclareTest2, this', 'anon method with proto ok')
is_deeply([ map { $_->() } @test_list ], [ 1, 2, 3, 4], 'binding ok');
+done_testing;