[libbread-board-perl] 30/66: fix release tests
Jonas Smedegaard
js at alioth.debian.org
Sun Sep 29 21:23:35 UTC 2013
This is an automated email from the git hooks/post-receive script.
js pushed a commit to branch master
in repository libbread-board-perl.
commit f6cf0f3a602c65e6dde483b60cff95f500321bab
Author: Jesse Luehrs <doy at tozt.net>
Date: Thu Aug 1 13:27:48 2013 -0400
fix release tests
---
dist.ini | 2 +-
lib/Bread/Board/GraphViz.pm | 8 ++++++++
lib/Bread/Board/GraphViz/App.pm | 6 ++++++
t/301_sugar.t | 4 ++--
4 files changed, 17 insertions(+), 3 deletions(-)
diff --git a/dist.ini b/dist.ini
index 71187b0..5a93c4e 100644
--- a/dist.ini
+++ b/dist.ini
@@ -12,7 +12,7 @@ github_name = BreadBoard
bugtracker_web = https://github.com/stevan/BreadBoard/issues
bugtracker_mailto =
authority = cpan:STEVAN
-CompileTests_skip = GraphViz|visualize
+Test::Compile_skip = GraphViz|visualize
[AutoPrereqs]
skip = Data::Visitor::Callback
diff --git a/lib/Bread/Board/GraphViz.pm b/lib/Bread/Board/GraphViz.pm
index c07c1ef..5b47264 100644
--- a/lib/Bread/Board/GraphViz.pm
+++ b/lib/Bread/Board/GraphViz.pm
@@ -147,4 +147,12 @@ All complex software has bugs lurking in it, and this module is no
exception. If you find a bug please either email me, or add the bug
to cpan-RT.
+=begin Pod::Coverage
+
+ graph
+ name_prefix
+ service_name
+
+=end Pod::Coverage
+
=cut
diff --git a/lib/Bread/Board/GraphViz/App.pm b/lib/Bread/Board/GraphViz/App.pm
index 89eae3f..fdba4b4 100644
--- a/lib/Bread/Board/GraphViz/App.pm
+++ b/lib/Bread/Board/GraphViz/App.pm
@@ -45,4 +45,10 @@ All complex software has bugs lurking in it, and this module is no
exception. If you find a bug please either email me, or add the bug
to cpan-RT.
+=begin Pod::Coverage
+
+ run
+
+=end Pod::Coverage
+
=cut
diff --git a/t/301_sugar.t b/t/301_sugar.t
index 5dab49d..73e53fd 100644
--- a/t/301_sugar.t
+++ b/t/301_sugar.t
@@ -29,7 +29,7 @@ $exception = exception{ container $c, 'thing1', 'thing2' };
like( $exception, qr/^container\(\$object, \.\.\.\) is not supported/, 'exception begins with: container($object, ...) is not supported' );
-$exception = exception{
+$exception = exception{
container 'MyApp' => as { service 'service_name', 'thing1', 'thing2', 'trouble' }
};
like( $exception, qr/^A service is defined by/, 'exception begins with: A service is defined by' );
@@ -39,7 +39,7 @@ like( $exception, qr/^A service is defined by/, 'exception begins with: A servic
use Moose;
}
-$exception = exception{
+$exception = exception{
container 'MyApp' => as {
service 'service_name',
'service_class' => 'MyNonService',
--
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/libbread-board-perl.git
More information about the Pkg-perl-cvs-commits
mailing list