more test description
André Walker [Wed, 8 Jun 2011 20:55:03 +0000 (17:55 -0300)]
t/aggregate/unit_core_container_mock_load.t
t/aggregate/unit_core_container_mock_load_env.t

index 695b2ab..9a04b2d 100644 (file)
@@ -18,12 +18,12 @@ __PACKAGE__->config->{ substitutions } = {
 
 __PACKAGE__->setup;
 
-ok( my $conf = __PACKAGE__->config );
+ok( my $conf = __PACKAGE__->config, 'config loads' );
 is( $conf->{ 'Controller::Foo' }->{ foo }, 'bar' );
 is( $conf->{ 'Controller::Foo' }->{ new }, 'key' );
 is( $conf->{ 'Model::Baz' }->{ qux },      'xyzzy' );
 is( $conf->{ 'Model::Baz' }->{ another },  'new key' );
 is( $conf->{ 'view' },                     'View::TT::New' );
 is( $conf->{ 'foo_sub' },                  'x-y' );
-is( $conf->{ 'literal_macro' },            '__DATA__' );
+is( $conf->{ 'literal_macro' },            '__DATA__', 'literal macro' );
 is( $conf->{ 'Plugin::Zot' }->{ zoot },    'zooot');
index 55e9015..311d6ac 100644 (file)
@@ -19,12 +19,12 @@ __PACKAGE__->config->{substitutions} = {
 
 __PACKAGE__->setup;
 
-ok( my $conf = __PACKAGE__->config );
+ok( my $conf = __PACKAGE__->config, 'config loads' );
 is( $conf->{ 'Controller::Foo' }->{ foo }, 'bar' );
 is( $conf->{ 'Controller::Foo' }->{ new }, 'key' );
 is( $conf->{ 'Model::Baz' }->{ qux },      'xyzzy' );
 is( $conf->{ 'Model::Baz' }->{ another },  'new key' );
 is( $conf->{ 'view' },                     'View::TT::New' );
 is( $conf->{ 'foo_sub' },                  'x-y' );
-is( $conf->{ 'literal_macro' },            '__DATA__' );
-is( $conf->{ 'environment_macro' },        $ENV{ CATALYST_HOME }.'/mockapp.pl' );
+is( $conf->{ 'literal_macro' },            '__DATA__', 'literal macro' );
+is( $conf->{ 'environment_macro' },        $ENV{ CATALYST_HOME }.'/mockapp.pl', 'environment macro' );