[SCM] libmessage-passing-perl Debian packaging branch, master, updated. debian/0.111-3-14-g44f6e88
Tomas Doran
bobtfish at bobtfish.net
Mon May 6 11:56:42 UTC 2013
The following commit has been merged in the master branch:
commit ca3a7ec714e285dd157619f1b6fd496a0fcbbaaf
Author: Tomas Doran <bobtfish at bobtfish.net>
Date: Sun Mar 4 12:42:42 2012 +0000
Rename method
diff --git a/lib/Log/Stash/Output/Test.pm b/lib/Log/Stash/Output/Test.pm
index 308b192..afbc525 100644
--- a/lib/Log/Stash/Output/Test.pm
+++ b/lib/Log/Stash/Output/Test.pm
@@ -8,7 +8,7 @@ has messages => (
traits => ['Array'],
handles => {
consume => 'push',
- messages_count => 'count',
+ message_count => 'count',
messages => 'elements',
},
clearer => 'clear_messages',
diff --git a/t/dsl.t b/t/dsl.t
index 1da5c3a..2f8b1ec 100644
--- a/t/dsl.t
+++ b/t/dsl.t
@@ -22,7 +22,7 @@ isa_ok $c->output_to, 'Log::Stash::Filter::Null';
isa_ok $c->output_to->output_to, 'Log::Stash::Output::Test';
$c->output_to->consume({foo => 'bar'});
my $test = $c->output_to->output_to;
-is $test->messages_count, 1;
+is $test->message_count, 1;
is_deeply [$test->messages], [{foo => 'bar'}];
done_testing;
diff --git a/t/filter.t b/t/filter.t
index 84ca62a..3576420 100644
--- a/t/filter.t
+++ b/t/filter.t
@@ -23,14 +23,14 @@ ok $test;
try { $ob->consume('message') }
catch { fail "Failed to consume message: $_" };
-is $test->messages_count, 1;
+is $test->message_count, 1;
is_deeply [$test->messages], ['message'];
is $called, 1;
try { $test->clear_messages }
catch { fail "Could not clear messages: $_" };
-is $test->messages_count, 0;
+is $test->message_count, 0;
is_deeply [$test->messages], [];
$ob = try {
@@ -45,7 +45,7 @@ ok $test;
try { $ob->consume('message') }
catch { fail "Failed to consume message: $_" };
-is $test->messages_count, 0;
+is $test->message_count, 0;
$called = 0;
my $called2 = 0;
@@ -66,11 +66,11 @@ ok $test;
try { $ob->consume('message') }
catch { fail "Failed to consume message: $_" };
-is $test->messages_count, 1;
+is $test->message_count, 1;
is_deeply [$test->messages], ['message'];
is $called, 1;
-is $test2->messages_count, 1;
+is $test2->message_count, 1;
is_deeply [$test2->messages], ['message'];
is $called2, 1;
diff --git a/t/output_test.t b/t/output_test.t
index c30022f..f55e786 100644
--- a/t/output_test.t
+++ b/t/output_test.t
@@ -14,14 +14,14 @@ ok $test;
try { $test->consume('message') }
catch { fail "Failed to consume message: $_" };
-is $test->messages_count, 1;
+is $test->message_count, 1;
is_deeply [$test->messages], ['message'];
is $called, 1;
try { $test->clear_messages }
catch { fail "Could not clear messages: $_" };
-is $test->messages_count, 0;
+is $test->message_count, 0;
is_deeply [$test->messages], [];
done_testing;
--
libmessage-passing-perl Debian packaging
More information about the Pkg-perl-cvs-commits
mailing list