Fixing error ""my" variable %format_X_name masks earlier declaration in same scope...
Ken Youens-Clark [Wed, 5 Nov 2003 23:23:55 +0000 (23:23 +0000)]
t/20format_X_name.t

index d3556a9..06af54c 100644 (file)
@@ -6,7 +6,7 @@ use strict;
 use SQL::Translator;
 use Test::More tests => 25;
 
-my (%format_X_name, $tr, $ret);
+my ($tr, $ret);
 
 my %format_X_name = (
     format_table_name   => sub { "table_$_[0]"   },