[Catalyst-commits] r6792 - in trunk/Catalyst-View-Mason/t: .
lib/TestApp/View/Mason lib/TestApp/root
rafl at dev.catalyst.perl.org
rafl at dev.catalyst.perl.org
Tue Aug 28 17:03:08 GMT 2007
Author: rafl
Date: 2007-08-28 17:03:08 +0100 (Tue, 28 Aug 2007)
New Revision: 6792
Added:
trunk/Catalyst-View-Mason/t/extension.t
trunk/Catalyst-View-Mason/t/lib/TestApp/View/Mason/Extension.pm
trunk/Catalyst-View-Mason/t/lib/TestApp/root/test.mas
Log:
test template_extension.
Added: trunk/Catalyst-View-Mason/t/extension.t
===================================================================
--- trunk/Catalyst-View-Mason/t/extension.t (rev 0)
+++ trunk/Catalyst-View-Mason/t/extension.t 2007-08-28 16:03:08 UTC (rev 6792)
@@ -0,0 +1,20 @@
+#!perl
+
+use strict;
+use warnings;
+use Test::More tests => 5;
+
+use FindBin;
+use lib "$FindBin::Bin/lib";
+
+use_ok('Catalyst::Test', 'TestApp');
+
+my $response = request('/test?view=Pkgconfig');
+
+ok($response->is_success, 'request ok');
+is($response->content, TestApp->config->{default_message}, 'message ok');
+
+$response = request('/test?view=Extension');
+
+ok($response->is_success, 'request ok');
+is($response->content, 'template extension', 'used template extension');
Added: trunk/Catalyst-View-Mason/t/lib/TestApp/View/Mason/Extension.pm
===================================================================
--- trunk/Catalyst-View-Mason/t/lib/TestApp/View/Mason/Extension.pm (rev 0)
+++ trunk/Catalyst-View-Mason/t/lib/TestApp/View/Mason/Extension.pm 2007-08-28 16:03:08 UTC (rev 6792)
@@ -0,0 +1,11 @@
+package TestApp::View::Mason::Extension;
+
+use strict;
+use warnings;
+use base qw/Catalyst::View::Mason/;
+
+__PACKAGE__->config(
+ template_extension => '.mas',
+);
+
+1;
Added: trunk/Catalyst-View-Mason/t/lib/TestApp/root/test.mas
===================================================================
--- trunk/Catalyst-View-Mason/t/lib/TestApp/root/test.mas (rev 0)
+++ trunk/Catalyst-View-Mason/t/lib/TestApp/root/test.mas 2007-08-28 16:03:08 UTC (rev 6792)
@@ -0,0 +1 @@
+template extension\
More information about the Catalyst-commits
mailing list