[Catalyst-commits] r11704 - in Catalyst-View-TD/trunk:
lib/Catalyst/Helper lib/Catalyst/Helper/View
lib/Catalyst/View t t/lib/TestApp t/lib/TestApp/TMPL
t/lib/TestApp/Templates t/lib/TestApp/Templates/HTML
t/lib/TestApp/View
theory at dev.catalyst.perl.org
theory at dev.catalyst.perl.org
Sat Oct 31 23:09:42 GMT 2009
Author: theory
Date: 2009-10-31 23:09:42 +0000 (Sat, 31 Oct 2009)
New Revision: 11704
Added:
Catalyst-View-TD/trunk/t/lib/TestApp/TMPL/
Catalyst-View-TD/trunk/t/lib/TestApp/Templates/
Catalyst-View-TD/trunk/t/lib/TestApp/Templates/Appconfig.pm
Removed:
Catalyst-View-TD/trunk/t/lib/TestApp/TD/
Catalyst-View-TD/trunk/t/lib/TestApp/Template/
Catalyst-View-TD/trunk/t/lib/TestApp/Templates/Appconfig.pm
Modified:
Catalyst-View-TD/trunk/lib/Catalyst/Helper/TDClass.pm
Catalyst-View-TD/trunk/lib/Catalyst/Helper/View/TD.pm
Catalyst-View-TD/trunk/lib/Catalyst/View/TD.pm
Catalyst-View-TD/trunk/t/06append_dispatchto.t
Catalyst-View-TD/trunk/t/06prepend_dispatchto.t
Catalyst-View-TD/trunk/t/08cycle.t
Catalyst-View-TD/trunk/t/12tdstuff.t
Catalyst-View-TD/trunk/t/lib/TestApp/TMPL/Pkgconfig.pm
Catalyst-View-TD/trunk/t/lib/TestApp/Templates/Additional.pm
Catalyst-View-TD/trunk/t/lib/TestApp/Templates/HTML.pm
Catalyst-View-TD/trunk/t/lib/TestApp/Templates/HTML/User.pm
Catalyst-View-TD/trunk/t/lib/TestApp/Templates/HTML/Util.pm
Catalyst-View-TD/trunk/t/lib/TestApp/Templates/NoAlias.pm
Catalyst-View-TD/trunk/t/lib/TestApp/View/Pkgconfig.pm
Log:
Templates are no longer kept in `MyApp::TD` by default, but in
`MyApp::Templates`. I think that this is a much better namespace. But then you
can always pick something else if you want, as long as it's noted in
`dispatch_to`.
Modified: Catalyst-View-TD/trunk/lib/Catalyst/Helper/TDClass.pm
===================================================================
--- Catalyst-View-TD/trunk/lib/Catalyst/Helper/TDClass.pm 2009-10-31 21:11:29 UTC (rev 11703)
+++ Catalyst-View-TD/trunk/lib/Catalyst/Helper/TDClass.pm 2009-10-31 23:09:42 UTC (rev 11704)
@@ -32,7 +32,7 @@
my ( $self, $helper, $name ) = @_;
$name ||= $helper->{name};
- my $class = "$helper->{app}::TD::$name";
+ my $class = "$helper->{app}::Templates::$name";
my @path = split /::/, $class;
my $file = pop @path;
Modified: Catalyst-View-TD/trunk/lib/Catalyst/Helper/View/TD.pm
===================================================================
--- Catalyst-View-TD/trunk/lib/Catalyst/Helper/View/TD.pm 2009-10-31 21:11:29 UTC (rev 11703)
+++ Catalyst-View-TD/trunk/lib/Catalyst/Helper/View/TD.pm 2009-10-31 23:09:42 UTC (rev 11704)
@@ -24,7 +24,7 @@
sub mk_compclass {
my ( $self, $helper ) = @_;
- (my $tclass = $helper->{class}) =~ s/::View::/::TD::/;
+ (my $tclass = $helper->{class}) =~ s/::View::/::Templates::/;
my $file = $helper->{file};
$helper->render_file( 'compclass', $file, { tclass => $tclass } );
Modified: Catalyst-View-TD/trunk/lib/Catalyst/View/TD.pm
===================================================================
--- Catalyst-View-TD/trunk/lib/Catalyst/View/TD.pm 2009-10-31 21:11:29 UTC (rev 11703)
+++ Catalyst-View-TD/trunk/lib/Catalyst/View/TD.pm 2009-10-31 23:09:42 UTC (rev 11704)
@@ -27,7 +27,7 @@
name => 'MyApp',
root => MyApp->path_to('root'),
'View::HTML => {
- dispatch_to => ['TestApp::TD::HTML'], # Default
+ dispatch_to => ['TestApp::Templates::HTML'], # Default
strict => 1,
auto_alias => 1,
preprocessor => sub { ... },
@@ -35,7 +35,7 @@
},
);
-Create a template by editing F<lib/MyApp/TD/HTML.pm>:
+Create a template by editing F<lib/MyApp/Templates/HTML.pm>:
template hello => sub {
my ($self, $vars) = @_;
@@ -87,7 +87,7 @@
sub _load_templates {
my ($class, $auto_alias) = @_;
- (my $root = $class) =~ s/::View::/::TD::/;
+ (my $root = $class) =~ s/::View::/::Templates::/;
my @classes = $auto_alias ? Module::Pluggable::Object->new(
require => 0,
@@ -209,17 +209,17 @@
use parent 'Catalyst::View::TD';
__PACKAGE__->config(
- # dispatch_to => [qw(MyApp::TD::HTML)],
+ # dispatch_to => [qw(MyApp::Templates::HTML)],
# auto_alias => 1,
# strict => 1,
# postprocessor => sub { ... },
# around_template => sub { ... },
);
-It also creates a C<MyApp::TD::HTML> template class that looks something like
-this:
+It also creates a C<MyApp::Templates::HTML> template class that looks
+something like this:
- package MyApp::TD::HTML;
+ package MyApp::Templates::HTML;
use strict;
use warnings;
@@ -257,7 +257,7 @@
use parent 'Catalyst::View::TD';
__PACKAGE__->config({
- dispatch_to => [ 'MyApp::TD::HTML' ],
+ dispatch_to => [ 'MyApp::Templates::HTML' ],
auto_alias => 1,
strict => 1,
postprocessor => sub { ... },
@@ -273,7 +273,7 @@
sub new {
my $self = shift;
$self->config({
- dispatch_to => [ 'MyApp::TD::HTML' ],
+ dispatch_to => [ 'MyApp::Templates::HTML' ],
auto_alias => 1,
strict => 1,
postprocessor => sub { ... },
@@ -296,7 +296,7 @@
MyApp->config({
name => 'MyApp',
'View::HTML' => {
- dispatch_to => [ 'MyApp::TD::HTML' ],
+ dispatch_to => [ 'MyApp::Templates::HTML' ],
auto_alias => 1,
strict => 1,
postprocessor => sub { ... },
@@ -310,15 +310,15 @@
=head2 Auto-Aliasing
In addition to the dispatch template class (as defined in the C<dispatch_to>
-configuration, or defaulting to C<MyApp::TD::ViewName>), you can write
+configuration, or defaulting to C<MyApp::Templates::ViewName>), you can write
templates in other classes and they will automatically be aliased into the
dispatch class. The aliasing of templates is similar to how controller actions
map to URLs.
For example, say that you have a dispatch template class for your
-C<MyApp::View::XHTML> view named C<MyApp::TD::XHMTL>:
+C<MyApp::View::XHTML> view named C<MyApp::Templates::XHTML>:
- package TestApp::TD::XHTML;
+ package TestApp::Templates::XHTML;
use Template::Declare::Tags;
template home => sub {
@@ -346,13 +346,17 @@
};
But it can get to be a nightmare to manage I<all> of your templates in this
-one class. A better idea is to divide them up into other classes just
-as you have them in separate controllers. The C<auto_alias> feature of
+one class. A better idea is to divide them up into other classes just as you
+have them in separate controllers. The C<auto_alias> feature of
Catalyst::View::TD does just that. Rather than define a template named
-C<users/list> in the dispatch class (C<MyApp::TD::XHTML>), create one
-named C<list> in C<MyApp::TD::XHTML::Users>:
+C<users/list> in the dispatch class (C<MyApp::Templates::XHTML>), create a new
+template class, C<MyApp::Templates::XHTML::Users>:
- package TestApp::TD::XHTML::Users;
+ ./script/myapp_create.pl TDClass XHTML::Users
+
+Then create a C<list> template there:
+
+ package TestApp::Templates::XHTML::Users;
use Template::Declare::Tags;
template list => sub {
@@ -362,15 +366,15 @@
Catalyst::View::TD will automatically mix the templates found in all classes
defined below the dispatch class into the dispatch class. Thus this template
-will be mixed into C<MyApp::TD::XHTML> as C<users/list>. The nice thing about
-this is it allows you to create template classes with templates that
+will be mixed into C<MyApp::Templates::XHTML> as C<users/list>. The nice thing
+about this is it allows you to create template classes with templates that
correspond directly to controller classes and their actions.
You can also use this approach to create utility templates. For example,
if you wanted to put the header and footer output into utility templates,
you could put them into a utility class:
- package TestApp::TD::XHTML::Util;
+ package TestApp::Templates::XHTML::Util;
use Template::Declare::Tags;
template header => sub {
@@ -388,7 +392,7 @@
And then you can simply use these templates from the dispatch class or any
other aliased template class, including the dispatch class:
- package TestApp::TD::XHTML;
+ package TestApp::Templates::XHTML;
use Template::Declare::Tags;
template home => sub {
@@ -403,7 +407,7 @@
And the users class:
- package TestApp::TD::XHTML::Users;
+ package TestApp::Templates::XHTML::Users;
use Template::Declare::Tags;
template list => sub {
@@ -422,15 +426,15 @@
from C<Template::Declare::Catayst> and do the mixing yourself. The equivalent
to the auto-aliasing in the above examples would be:
- package TestApp::TD::XHTML;
+ package TestApp::Templates::XHTML;
use base 'Template::Declare::Catalyst';
use Template::Declare::Tags;
- use TestApp::TD::XHTML::Users;
- use TestApp::TD::XHTML::Util;
+ use TestApp::Templates::XHTML::Users;
+ use TestApp::Templates::XHTML::Util;
- alias TestApp::TD::XHTML::Users under '/users';
- alias TestApp::TD::XHTML::Util under '/util';
+ alias TestApp::Templates::XHTML::Users under '/users';
+ alias TestApp::Templates::XHTML::Util under '/util';
This would be the way to go if you wanted finer control over
Template::Declare's L<composition features|Template::Declare/"Template Composition">.
@@ -561,7 +565,7 @@
./script/myapp_create.pl TDClass HTML::Users
This will create a new Template::Declare template class,
-C<MyApp::TD::HTML::Users> in the F<lib> directory. This is perhaps best used
+C<MyApp::Templates::HTML::Users> in the F<lib> directory. This is perhaps best used
in conjunction with creating a new controller for which you expect to create
views:
@@ -569,7 +573,7 @@
./script/myapp_create.pl TDClass HTML::Users
As explained in L</"Auto-Aliasing">, if you already have the TD view
-C<MyApp::View::HTML>, the templates in the C<MyApp::TD::HTML::Users> class
+C<MyApp::View::HTML>, the templates in the C<MyApp::Templates::HTML::Users> class
will be aliased under the C</users> path. So if you defined a C<list> action
in the C<Users> controller and a corresponding C<list> view in the
C<HTML::Users> view, both would resolve to C</users/list>.
@@ -591,7 +595,7 @@
=head3 C<config>
__PACKAGE__->config(
- dispatch_to => [qw(MyApp::TD::HTML)],
+ dispatch_to => [qw(MyApp::Templates::HTML)],
auto_alias => 1,
strict => 1,
postprocessor => sub { ... },
Modified: Catalyst-View-TD/trunk/t/06append_dispatchto.t
===================================================================
--- Catalyst-View-TD/trunk/t/06append_dispatchto.t 2009-10-31 21:11:29 UTC (rev 11703)
+++ Catalyst-View-TD/trunk/t/06append_dispatchto.t 2009-10-31 23:09:42 UTC (rev 11704)
@@ -10,14 +10,14 @@
my $initial_dispatchto = [ @{ TestApp->view('Appconfig')->dispatch_to } ];
-ok(($response = request("/test_append_dispatchto?view=Appconfig&template=testclass&additionalclass=TestApp::TD::Additional"))->is_success, 'additional_template_class request');
+ok(($response = request("/test_append_dispatchto?view=Appconfig&template=testclass&additionalclass=TestApp::Templates::Additional"))->is_success, 'additional_template_class request');
is($response->content, "From Additional: " . TestApp->config->{default_message}, 'additional_template_class message');
is_deeply($initial_dispatchto,
TestApp->view('Appconfig')->dispatch_to,
'dispatchto is unchanged');
-ok(($response = request("/test_append_dispatchto?view=Appconfig&template=test&additionalclass=TestApp::TD::Additional"))->is_success, 'additional_template_class request');
+ok(($response = request("/test_append_dispatchto?view=Appconfig&template=test&additionalclass=TestApp::Templates::Additional"))->is_success, 'additional_template_class request');
is($response->content, TestApp->config->{default_message}, 'appconfig_template_class message');
is_deeply($initial_dispatchto,
@@ -27,17 +27,17 @@
ok(($response = request("/test_append_dispatchto?view=Additional&template=testclass"))->is_success, 'dispatchto set to the alternate class');
is($response->content, "From Additional: " . TestApp->config->{default_message}, 'request to view using the alternate template class');
-ok(($response = request("/test_append_dispatchto?view=Appconfig&template=testclass&addclass=TestApp::TD::Additional"))->is_success, 'add class to the array');
+ok(($response = request("/test_append_dispatchto?view=Appconfig&template=testclass&addclass=TestApp::Templates::Additional"))->is_success, 'add class to the array');
is($response->content, "From Additional: " . TestApp->config->{default_message}, 'added class template renders');
-is_deeply([@$initial_dispatchto, 'TestApp::TD::Additional'],
+is_deeply([@$initial_dispatchto, 'TestApp::Templates::Additional'],
TestApp->view('Appconfig')->dispatch_to,
'dispatchto has been changed');
-ok(($response = request("/test_append_dispatchto?view=Appconfig&template=testclass&setclass=TestApp::TD::Additional"))->is_success, 'set dispatchto from request');
+ok(($response = request("/test_append_dispatchto?view=Appconfig&template=testclass&setclass=TestApp::Templates::Additional"))->is_success, 'set dispatchto from request');
is($response->content, "From Additional: " . TestApp->config->{default_message}, 'set class template renders');
-is_deeply(['TestApp::TD::Additional'],
+is_deeply(['TestApp::Templates::Additional'],
TestApp->view('Appconfig')->dispatch_to,
'dispatchto has been overridden');
Modified: Catalyst-View-TD/trunk/t/06prepend_dispatchto.t
===================================================================
--- Catalyst-View-TD/trunk/t/06prepend_dispatchto.t 2009-10-31 21:11:29 UTC (rev 11703)
+++ Catalyst-View-TD/trunk/t/06prepend_dispatchto.t 2009-10-31 23:09:42 UTC (rev 11704)
@@ -10,7 +10,7 @@
my $initial_dispatchto = [ @{ TestApp->view('Appconfig')->dispatch_to } ];
-ok(($response = request("/test_prepend_dispatchto?view=Appconfig&template=testclass&additionalclass=TestApp::TD::Additional"))->is_success, 'additional_template_class request');
+ok(($response = request("/test_prepend_dispatchto?view=Appconfig&template=testclass&additionalclass=TestApp::Templates::Additional"))->is_success, 'additional_template_class request');
is($response->content, "From Additional: " . TestApp->config->{default_message}, 'additional_template_class message');
is_deeply($initial_dispatchto,
@@ -20,17 +20,17 @@
ok(($response = request("/test_prepend_dispatchto?view=Additional&template=testclass"))->is_success, 'dispatchto set to the alternate class');
is($response->content, "From Additional: " . TestApp->config->{default_message}, 'request to view using the alternate template class');
-ok(($response = request("/test_prepend_dispatchto?view=Appconfig&template=testclass&addclass=TestApp::TD::Additional"))->is_success, 'add class to the array');
+ok(($response = request("/test_prepend_dispatchto?view=Appconfig&template=testclass&addclass=TestApp::Templates::Additional"))->is_success, 'add class to the array');
is($response->content, "From Additional: " . TestApp->config->{default_message}, 'added class template renders');
-is_deeply([@$initial_dispatchto, 'TestApp::TD::Additional'],
+is_deeply([@$initial_dispatchto, 'TestApp::Templates::Additional'],
TestApp->view('Appconfig')->dispatch_to,
'dispatchto has been changed');
-ok(($response = request("/test_prepend_dispatchto?view=Appconfig&template=testclass&setclass=TestApp::TD::Additional"))->is_success, 'set dispatchto from request');
+ok(($response = request("/test_prepend_dispatchto?view=Appconfig&template=testclass&setclass=TestApp::Templates::Additional"))->is_success, 'set dispatchto from request');
is($response->content, "From Additional: " . TestApp->config->{default_message}, 'set class template renders');
-is_deeply(['TestApp::TD::Additional'],
+is_deeply(['TestApp::Templates::Additional'],
TestApp->view('Appconfig')->dispatch_to,
'dispatchto has been overridden');
Modified: Catalyst-View-TD/trunk/t/08cycle.t
===================================================================
--- Catalyst-View-TD/trunk/t/08cycle.t 2009-10-31 21:11:29 UTC (rev 11703)
+++ Catalyst-View-TD/trunk/t/08cycle.t 2009-10-31 23:09:42 UTC (rev 11704)
@@ -14,7 +14,7 @@
{
my $view = Catalyst::View::TD->new(
"TestApp",
- { dispatch_to => ['TestApp::TD::Appconfig'] },
+ { dispatch_to => ['TestApp::Templates::Appconfig'] },
);
# Can't Test::Memory::Cycle test since it doesn't detect
Modified: Catalyst-View-TD/trunk/t/12tdstuff.t
===================================================================
--- Catalyst-View-TD/trunk/t/12tdstuff.t 2009-10-31 21:11:29 UTC (rev 11703)
+++ Catalyst-View-TD/trunk/t/12tdstuff.t 2009-10-31 23:09:42 UTC (rev 11704)
@@ -10,7 +10,7 @@
# Check basic inheritance.
ok my $td = TestApp->view('Appconfig'), 'Get Appconfig view object';
-is $td->render(undef, 'test_self'), 'Self is TestApp::TD::Appconfig',
+is $td->render(undef, 'test_self'), 'Self is TestApp::Templates::Appconfig',
'self should be the subclass';
is $td->render(undef, 'test_isa', { what => 'Template::Declare::Catalyst' }),
Copied: Catalyst-View-TD/trunk/t/lib/TestApp/TMPL (from rev 11694, Catalyst-View-TD/trunk/t/lib/TestApp/Template)
Modified: Catalyst-View-TD/trunk/t/lib/TestApp/TMPL/Pkgconfig.pm
===================================================================
--- Catalyst-View-TD/trunk/t/lib/TestApp/Template/Pkgconfig.pm 2009-10-29 19:42:06 UTC (rev 11694)
+++ Catalyst-View-TD/trunk/t/lib/TestApp/TMPL/Pkgconfig.pm 2009-10-31 23:09:42 UTC (rev 11704)
@@ -1,4 +1,4 @@
-package TestApp::Template::Pkgconfig;
+package TestApp::TMPL::Pkgconfig;
use strict;
use Template::Declare::Tags;
Copied: Catalyst-View-TD/trunk/t/lib/TestApp/Templates (from rev 11694, Catalyst-View-TD/trunk/t/lib/TestApp/TD)
Modified: Catalyst-View-TD/trunk/t/lib/TestApp/Templates/Additional.pm
===================================================================
--- Catalyst-View-TD/trunk/t/lib/TestApp/TD/Additional.pm 2009-10-29 19:42:06 UTC (rev 11694)
+++ Catalyst-View-TD/trunk/t/lib/TestApp/Templates/Additional.pm 2009-10-31 23:09:42 UTC (rev 11704)
@@ -1,4 +1,4 @@
-package TestApp::TD::Additional;
+package TestApp::Templates::Additional;
use strict;
use warnings;
Deleted: Catalyst-View-TD/trunk/t/lib/TestApp/Templates/Appconfig.pm
===================================================================
--- Catalyst-View-TD/trunk/t/lib/TestApp/TD/Appconfig.pm 2009-10-29 19:42:06 UTC (rev 11694)
+++ Catalyst-View-TD/trunk/t/lib/TestApp/Templates/Appconfig.pm 2009-10-31 23:09:42 UTC (rev 11704)
@@ -1,28 +0,0 @@
-package TestApp::TD::Appconfig;
-
-use strict;
-use warnings;
-use Template::Declare::Tags;
-use TestApp::TD::Additional;
-
-template test => sub {
- my ($self, $args) = @_;
- outs $args->{message};
-};
-
-template specified_template => sub {
- my ($self, $args) = @_;
- outs "I should be a $args->{param} test in ", $self->c->config->{name};
-};
-
-template test_self => sub {
- my ($self, $args) = @_;
- outs "Self is $self";
-};
-
-template test_isa => sub {
- my ($self, $args) = @_;
- outs "Self is $args->{what}" if $self->isa($args->{what});
-};
-
-1;
Copied: Catalyst-View-TD/trunk/t/lib/TestApp/Templates/Appconfig.pm (from rev 11700, Catalyst-View-TD/trunk/t/lib/TestApp/TD/Appconfig.pm)
===================================================================
--- Catalyst-View-TD/trunk/t/lib/TestApp/Templates/Appconfig.pm (rev 0)
+++ Catalyst-View-TD/trunk/t/lib/TestApp/Templates/Appconfig.pm 2009-10-31 23:09:42 UTC (rev 11704)
@@ -0,0 +1,32 @@
+package TestApp::Templates::Appconfig;
+
+use strict;
+use warnings;
+use Template::Declare::Tags;
+use TestApp::Templates::Additional;
+
+template test => sub {
+ my ($self, $args) = @_;
+ outs $args->{message};
+};
+
+template specified_template => sub {
+ my ($self, $args) = @_;
+ outs "I should be a $args->{param} test in ", $self->c->config->{name};
+};
+
+template test_self => sub {
+ my ($self, $args) = @_;
+ outs "Self is $self";
+};
+
+template test_isa => sub {
+ my ($self, $args) = @_;
+ outs "Self is $args->{what}" if $self->isa($args->{what});
+};
+
+template omgwtf => sub {
+ die 'OMGWTF!';
+};
+
+1;
Modified: Catalyst-View-TD/trunk/t/lib/TestApp/Templates/HTML/User.pm
===================================================================
--- Catalyst-View-TD/trunk/t/lib/TestApp/TD/HTML/User.pm 2009-10-29 19:42:06 UTC (rev 11694)
+++ Catalyst-View-TD/trunk/t/lib/TestApp/Templates/HTML/User.pm 2009-10-31 23:09:42 UTC (rev 11704)
@@ -1,4 +1,4 @@
-package TestApp::TD::HTML::User;
+package TestApp::Templates::HTML::User;
use strict;
use warnings;
Modified: Catalyst-View-TD/trunk/t/lib/TestApp/Templates/HTML/Util.pm
===================================================================
--- Catalyst-View-TD/trunk/t/lib/TestApp/TD/HTML/Util.pm 2009-10-29 19:42:06 UTC (rev 11694)
+++ Catalyst-View-TD/trunk/t/lib/TestApp/Templates/HTML/Util.pm 2009-10-31 23:09:42 UTC (rev 11704)
@@ -1,4 +1,4 @@
-package TestApp::TD::HTML::Util;
+package TestApp::Templates::HTML::Util;
use strict;
use warnings;
Modified: Catalyst-View-TD/trunk/t/lib/TestApp/Templates/HTML.pm
===================================================================
--- Catalyst-View-TD/trunk/t/lib/TestApp/TD/HTML.pm 2009-10-29 19:42:06 UTC (rev 11694)
+++ Catalyst-View-TD/trunk/t/lib/TestApp/Templates/HTML.pm 2009-10-31 23:09:42 UTC (rev 11704)
@@ -1,4 +1,4 @@
-package TestApp::TD::HTML;
+package TestApp::Templates::HTML;
use strict;
use warnings;
Modified: Catalyst-View-TD/trunk/t/lib/TestApp/Templates/NoAlias.pm
===================================================================
--- Catalyst-View-TD/trunk/t/lib/TestApp/TD/NoAlias.pm 2009-10-29 19:42:06 UTC (rev 11694)
+++ Catalyst-View-TD/trunk/t/lib/TestApp/Templates/NoAlias.pm 2009-10-31 23:09:42 UTC (rev 11704)
@@ -1,12 +1,12 @@
-package TestApp::TD::NoAlias;
+package TestApp::Templates::NoAlias;
use strict;
use warnings;
use base 'Template::Declare::Catalyst';
use Template::Declare::Tags;
-use TestApp::TD::HTML::Util;
+use TestApp::Templates::HTML::Util;
-alias TestApp::TD::HTML::Util under 'here';
+alias TestApp::Templates::HTML::Util under 'here';
template body => sub {
show 'here/header';
Modified: Catalyst-View-TD/trunk/t/lib/TestApp/View/Pkgconfig.pm
===================================================================
--- Catalyst-View-TD/trunk/t/lib/TestApp/View/Pkgconfig.pm 2009-10-31 21:11:29 UTC (rev 11703)
+++ Catalyst-View-TD/trunk/t/lib/TestApp/View/Pkgconfig.pm 2009-10-31 23:09:42 UTC (rev 11704)
@@ -4,7 +4,7 @@
use base 'Catalyst::View::TD';
__PACKAGE__->config(
- dispatch_to => [qw(TestApp::Template::Pkgconfig)],
+ dispatch_to => [qw(TestApp::TMPL::Pkgconfig)],
postprocessor => sub {
local $_ = shift;
s/^\s+//msg;
More information about the Catalyst-commits
mailing list