Author: REHSACK
Date: Sat Jun  5 10:02:38 2010
New Revision: 14112

Modified:
   dbi/trunk/lib/DBD/File.pm

Log:
Fix arguments of clear_file_meta

Modified: dbi/trunk/lib/DBD/File.pm
==============================================================================
--- dbi/trunk/lib/DBD/File.pm   (original)
+++ dbi/trunk/lib/DBD/File.pm   Sat Jun  5 10:02:38 2010
@@ -463,7 +463,7 @@
 
 sub clear_file_meta
 {
-    my ($dbh, $table, $attr, $value) = @_;
+    my ($dbh, $table) = @_;
 
     my $class = $dbh->FETCH ("ImplementorClass");
     $class =~ s/::db$/::Table/;
@@ -944,7 +944,7 @@
 
     my $meta = {};
     defined $dbh->{f_meta}{$table} and $meta = $dbh->{f_meta}{$table};
-DOUBLE_CKECK:
+
     unless ($meta->{initialized}) {
        $self->bootstrap_table_meta ($dbh, $meta, $table);
 

Reply via email to