[svn:dbi] r14468 - dbi/trunk/lib/DBD

[email protected] Thu, 7 Oct 2010 23:48:19 -0700 (PDT)
Newsgroups perl.dbi.changes
Message-ID <[email protected]>
Author: hmbrand
Date: Thu Oct  7 23:48:19 2010
New Revision: 14468

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

Log:
tidy

Modified: dbi/trunk/lib/DBD/File.pm
==============================================================================
--- dbi/trunk/lib/DBD/File.pm	(original)
+++ dbi/trunk/lib/DBD/File.pm	Thu Oct  7 23:48:19 2010
@@ -866,10 +866,10 @@
 
 	# now we know a bit more - let's check if user can't use consequent spelling
 	# XXX add know issue about reset sql_identifier_case here ...
-	if (defined $dbh->{f_meta}{$table} && defined($dbh->{f_meta}{$table}{initialized})) {
+	if (defined $dbh->{f_meta}{$table} && defined $dbh->{f_meta}{$table}{initialized}) {
 	    $meta = $dbh->{f_meta}{$table};
 	    $self->file2table ($meta, $table, $file_is_table, $respect_case) or
-		return unless ($dbh->{f_meta}{$table}{initialized});
+		return unless $dbh->{f_meta}{$table}{initialized};
 	    }
 	unless ($dbh->{f_meta}{$table}{initialized}) {
 	    $self->init_table_meta ($dbh, $meta, $table);