[Bast-commits] r8983 - ironman/IronMan-Schema/t
idn at dev.catalyst.perl.org
idn at dev.catalyst.perl.org
Thu Mar 11 20:54:22 GMT 2010
Author: idn
Date: 2010-03-11 20:54:22 +0000 (Thu, 11 Mar 2010)
New Revision: 8983
Modified:
ironman/IronMan-Schema/t/01_basic.t
ironman/IronMan-Schema/t/02_testdb_deploy.t
ironman/IronMan-Schema/t/03_resultset_feed.t
ironman/IronMan-Schema/t/04_resultset_post.t
Log:
Adding comments to each file to establish what they do
Modified: ironman/IronMan-Schema/t/01_basic.t
===================================================================
--- ironman/IronMan-Schema/t/01_basic.t 2010-03-11 20:52:36 UTC (rev 8982)
+++ ironman/IronMan-Schema/t/01_basic.t 2010-03-11 20:54:22 UTC (rev 8983)
@@ -2,5 +2,7 @@
use warnings;
use Test::More tests => 1;
+# Attempt to use this module.
+
BEGIN { use_ok 'IronMan::Schema' }
Modified: ironman/IronMan-Schema/t/02_testdb_deploy.t
===================================================================
--- ironman/IronMan-Schema/t/02_testdb_deploy.t 2010-03-11 20:52:36 UTC (rev 8982)
+++ ironman/IronMan-Schema/t/02_testdb_deploy.t 2010-03-11 20:54:22 UTC (rev 8983)
@@ -1,8 +1,9 @@
use strict;
use warnings;
-
use Test::More;
+# Attempt to deploy the schema as a test database
+
use IronMan::Schema;
my $schema;
Modified: ironman/IronMan-Schema/t/03_resultset_feed.t
===================================================================
--- ironman/IronMan-Schema/t/03_resultset_feed.t 2010-03-11 20:52:36 UTC (rev 8982)
+++ ironman/IronMan-Schema/t/03_resultset_feed.t 2010-03-11 20:54:22 UTC (rev 8983)
@@ -2,6 +2,8 @@
use warnings;
use Test::More tests => 2;
+# Test the IronMan::Schema::ResultSet::Feed local functions.
+
use IronMan::Schema;
my $dir = "t/var/";
Modified: ironman/IronMan-Schema/t/04_resultset_post.t
===================================================================
--- ironman/IronMan-Schema/t/04_resultset_post.t 2010-03-11 20:52:36 UTC (rev 8982)
+++ ironman/IronMan-Schema/t/04_resultset_post.t 2010-03-11 20:54:22 UTC (rev 8983)
@@ -1,6 +1,9 @@
use warnings;
use Test::More tests => 3;
+
+# Test the IronMan::Schema::ResultSet::Post local functions.
+
use IronMan::Schema;
use DateTime;
More information about the Bast-commits
mailing list