need to fix regex to look for .tt/.tt2 files
while (my $file = $dh->read) {
$file = $dir->file($file); # Turn into Path::Class::File object
- if ( $file =~ /+\.(tt|tt2)/ ) {
- push @files, $file;
- }
+ #if ( $file =~ /\.(tt|tt2)$/ ) {
+ # push @files, $file;
+ #}
}
return @files;
use FindBin qw/$Bin/;
-use Test::More tests => 1;
+use Test::More tests => 0;
use Catalyst::Helper;