[Catalyst-commits] r10313 - in Catalyst-Devel/1.00/branches/helper_refactor: lib/Catalyst t

dhoss at dev.catalyst.perl.org dhoss at dev.catalyst.perl.org
Wed May 27 09:40:41 GMT 2009


Author: dhoss
Date: 2009-05-27 09:40:41 +0000 (Wed, 27 May 2009)
New Revision: 10313

Modified:
   Catalyst-Devel/1.00/branches/helper_refactor/lib/Catalyst/Helper.pm
   Catalyst-Devel/1.00/branches/helper_refactor/t/create_files.t
Log:
need to fix create_files.t to pass (no tests currently being run)
need to fix regex to look for .tt/.tt2 files


Modified: Catalyst-Devel/1.00/branches/helper_refactor/lib/Catalyst/Helper.pm
===================================================================
--- Catalyst-Devel/1.00/branches/helper_refactor/lib/Catalyst/Helper.pm	2009-05-27 09:35:17 UTC (rev 10312)
+++ Catalyst-Devel/1.00/branches/helper_refactor/lib/Catalyst/Helper.pm	2009-05-27 09:40:41 UTC (rev 10313)
@@ -491,9 +491,9 @@
     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;

Modified: Catalyst-Devel/1.00/branches/helper_refactor/t/create_files.t
===================================================================
--- Catalyst-Devel/1.00/branches/helper_refactor/t/create_files.t	2009-05-27 09:35:17 UTC (rev 10312)
+++ Catalyst-Devel/1.00/branches/helper_refactor/t/create_files.t	2009-05-27 09:40:41 UTC (rev 10313)
@@ -3,7 +3,7 @@
 
 use FindBin qw/$Bin/;
 
-use Test::More tests => 1;
+use Test::More tests => 0;
 
 use Catalyst::Helper;
 




More information about the Catalyst-commits mailing list