fixed mistaken redeclared lexical and changed test case to not explode when using...
John Napiorkowski [Fri, 18 Feb 2011 14:08:44 +0000 (09:08 -0500)]
lib/DBIx/Class/Fixtures.pm
t/00-load.t

index 92ac222..395e923 100644 (file)
@@ -496,7 +496,7 @@ sub dump {
   my $schema = $params->{schema};
   my $config;
   if ($params->{config}) {
-    my $config = ref $params->{config} eq 'HASH' ? 
+    $config = ref $params->{config} eq 'HASH' ? 
       $params->{config} : 
       do {
         #read config
index 7bf3926..36b693d 100644 (file)
@@ -1,5 +1,3 @@
-#!perl -T
-
 use Test::More tests => 1;
 
 BEGIN {