Author: REHSACK
Date: Thu Jun 17 01:26:28 2010
New Revision: 14164
Modified:
dbi/trunk/lib/DBD/File.pm
Log:
MSWin32 Cwd::abs_path throws exception for non-existent files
Modified: dbi/trunk/lib/DBD/File.pm
==============================================================================
--- dbi/trunk/lib/DBD/File.pm (original)
+++ dbi/trunk/lib/DBD/File.pm Thu Jun 17 01:26:28 2010
@@ -1254,8 +1254,8 @@
}
}
- my $fqfn = Cwd::abs_path (File::Spec->catfile ($searchdir, $file));
- my $fqbn = Cwd::abs_path (File::Spec->catfile ($searchdir, $tbl));
+ my $fqfn = File::Spec->catfile ($searchdir, $file);
+ my $fqbn = File::Spec->catfile ($searchdir, $tbl);
$meta->{f_fqfn} = $fqfn;
$meta->{f_fqbn} = $fqbn;