From: Tomas Doran Date: Sat, 5 Sep 2009 15:15:48 +0000 (+0000) Subject: Add Moose so we have a constructor and fix changes generation X-Git-Tag: 1.21_01~1^2~37 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FCatalyst-Devel.git;a=commitdiff_plain;h=957ccd4d0640625358e7684f18b4958ed955c9f0 Add Moose so we have a constructor and fix changes generation --- diff --git a/lib/Catalyst/Helper.pm b/lib/Catalyst/Helper.pm index e584067..46bd4ec 100644 --- a/lib/Catalyst/Helper.pm +++ b/lib/Catalyst/Helper.pm @@ -1,6 +1,5 @@ package Catalyst::Helper; -use strict; -use warnings; +use Moose; use Config; use File::Spec; use File::Path; @@ -13,6 +12,7 @@ use Catalyst::Utils; use Catalyst::Exception; use Path::Class qw/dir file/; use File::ShareDir qw/dist_dir/; +use namespace::autoclean; my %cache; @@ -387,7 +387,7 @@ sub _mk_changes { my $self = shift; my $dir = $self->{dir}; my $time = strftime('%Y-%m-%d %H:%M:%S', localtime time); - $self->render_sharedir_file( 'Changes.tt', file($dir, "Changes", { time => $time } ) ); + $self->render_sharedir_file( 'Changes.tt', file($dir, "Changes"), { time => $time } ); } sub _mk_apptest {