Changeset 1040

Timestamp:

06/09/07 14:30:30 (18 months ago)

Author:

kake

Message:

Eradicate Test::MockObject? from test 15

Files:

• trunk/t/15_template.t (modified) (17 diffs)

trunk/t/15_template.t

@@ -3 +3 @@
 use CGI::Cookie;
 use Wiki::Toolkit::Formatter::UseMod;
-use OpenGuides::Config;
+use OpenGuides;
 use OpenGuides::Template;
-use Test::MockObject;
+use OpenGuides::Test;
 use Test::More tests => 28;
 
-my $config = OpenGuides::Config->new(
-       vars => {
-                 template_path         => cwd . '/t/templates',
-                 site_name             => 'Wiki::Toolkit Test Site',
-                 script_url            => 'http://wiki.example.com/',
-                 script_name           => 'mywiki.cgi',
-                 default_country       => 'United Kingdom',
-                 default_city          => 'London',
-                 contact_email         => 'wiki@example.com',
-                 stylesheet_url        => 'http://wiki.example.com/styles.css',
-                 home_name             => 'Home Page',
-                 formatting_rules_node => 'Rules',
-                 formatting_rules_link => '',
-               }
-);
-
-# White box testing - we know that OpenGuides::Template only actually uses
-# the node_name_to_node_param method of the formatter component of the wiki
-# object passed in, and I CBA to make a proper wiki object here.
-my $fake_wiki = Test::MockObject->new;
-$fake_wiki->mock("formatter",
-                 sub { return Wiki::Toolkit::Formatter::UseMod->new( munge_urls => 1 ); } );
-
-eval { OpenGuides::Template->output( wiki   => $fake_wiki,
+my $config = OpenGuides::Test->make_basic_config;
+$config->template_path( cwd . "/t/templates" );
+$config->site_name( "Wiki::Toolkit Test Site" );
+$config->script_url( "http://wiki.example.com/" );
+$config->script_name( "mywiki.cgi" );
+$config->contact_email( 'wiki@example.com' );
+$config->stylesheet_url( "http://wiki.example.com/styles.css" );
+$config->home_name( "Home Page" );
+$config->formatting_rules_node( "Rules" );
+$config->formatting_rules_link( "" );
+
+my $guide = OpenGuides->new( config => $config );
+my $wiki = $guide->wiki;
+
+eval { OpenGuides::Template->output( wiki   => $wiki,
                                      config => $config ); };
 ok( $@, "->output croaks if no template file supplied" );
 
 eval {
-    OpenGuides::Template->output( wiki     => $fake_wiki,
+    OpenGuides::Template->output( wiki     => $wiki,
                                   config   => $config,
                                   template => "15_test.tt" );
@@ -43 +34 @@
 
 my $output = OpenGuides::Template->output(
-    wiki     => $fake_wiki,
+    wiki     => $wiki,
     config   => $config,
     template => "15_test.tt",
@@ -53 +44 @@
 
 $output = OpenGuides::Template->output(
-    wiki         => $fake_wiki,
+    wiki         => $wiki,
     config       => $config,
     template     => "15_test.tt",
@@ -62 +53 @@
 
 $output = OpenGuides::Template->output(
-    wiki     => $fake_wiki,
+    wiki     => $wiki,
     config   => $config,
     template => "15_idonotexist.tt"
@@ -70 +61 @@
 # Test TT variables are auto-set from config.
 $output = OpenGuides::Template->output(
-    wiki     => $fake_wiki,
+    wiki     => $wiki,
     config   => $config,
     template => "15_test.tt"
@@ -94 +85 @@
 # Test TT variables auto-set from node name.
 $output = OpenGuides::Template->output(
-    wiki     => $fake_wiki,
+    wiki     => $wiki,
     config   => $config,
     node     => "Test Node",
@@ -106 +97 @@
 my $cookie = CGI::Cookie->new( -name => "x", -value => "y" );
 $output = OpenGuides::Template->output(
-    wiki     => $fake_wiki,
+    wiki     => $wiki,
     config   => $config,
     template => "15_test.tt",
@@ -125 +116 @@
 );
 $output = OpenGuides::Template->output(
-    wiki     => $fake_wiki,
+    wiki     => $wiki,
     config   => $config,
     template => "15_test.tt"
@@ -142 +133 @@
 );
 $output = OpenGuides::Template->output(
-    wiki     => $fake_wiki,
+    wiki     => $wiki,
     config   => $config,
     template => "15_test.tt"
@@ -160 +151 @@
 );
 $output = OpenGuides::Template->output(
-    wiki     => $fake_wiki,
+    wiki     => $wiki,
     config   => $config,
     template => "15_test.tt"
@@ -174 +165 @@
 $ENV{HTTP_COOKIE} = $cookie;
 $output = OpenGuides::Template->output(
-    wiki     => $fake_wiki,
+    wiki     => $wiki,
     config   => $config,
     template => "15_test.tt"
@@ -183 +174 @@
 # Test that explicitly supplied vars override vars in cookie.
 $output = OpenGuides::Template->output(
-    wiki     => $fake_wiki,
+    wiki     => $wiki,
     config   => $config,
     template => "15_test.tt",
@@ -202 +193 @@
 
 $output = OpenGuides::Template->output(
-    wiki     => $fake_wiki,
+    wiki     => $wiki,
     config   => $config,
     template => "15_test.tt",
@@ -211 +202 @@
 $config->enable_page_deletion( "n" );
 $output = OpenGuides::Template->output(
-    wiki     => $fake_wiki,
+    wiki     => $wiki,
     config   => $config,
     template => "15_test.tt",
@@ -220 +211 @@
 $config->enable_page_deletion( "y" );
 $output = OpenGuides::Template->output(
-    wiki     => $fake_wiki,
+    wiki     => $wiki,
     config   => $config,
     template => "15_test.tt",
@@ -229 +220 @@
 $config->enable_page_deletion( 0 );
 $output = OpenGuides::Template->output(
-    wiki     => $fake_wiki,
+    wiki     => $wiki,
     config   => $config,
     template => "15_test.tt",
@@ -238 +229 @@
 $config->enable_page_deletion( 1 );
 $output = OpenGuides::Template->output(
-    wiki     => $fake_wiki,
+    wiki     => $wiki,
     config   => $config,
     template => "15_test.tt",