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

[email protected]
Newsgroups perl.dbi.changes
Message-ID <[email protected]>
Author: hmbrand
Date: Mon May 24 11:33:53 2010
New Revision: 14029

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	Mon May 24 11:33:53 2010
@@ -726,17 +726,16 @@
 
     $meta->{f_fqfn} = $fqfn;
     $meta->{f_fqbn} = $file;
-    if( !defined($meta->{f_lockfile}) and $meta->{f_lockfile} ) {
+    !defined ($meta->{f_lockfile}) && $meta->{f_lockfile} and
 	$meta->{f_fqln} = $meta->{f_fqbn} . $meta->{f_lockfile};
-	}
 
     return $tbl;
     } # file2table
 
 my $open_table_re = sprintf "(?:%s|%s|%s)",
-	quotemeta (File::Spec->curdir  ()),
-	quotemeta (File::Spec->updir   ()),
-	quotemeta (File::Spec->rootdir ());
+    quotemeta (File::Spec->curdir  ()),
+    quotemeta (File::Spec->updir   ()),
+    quotemeta (File::Spec->rootdir ());
 
 sub init_table_meta ($$$$$)
 {
lmpx.com only provides a reader for public news (NNTP) servers. It is not affiliated with the servers or forums shown here and is not responsible for the content of articles, which is written by their respective authors.