1
0
Fork 0
mirror of https://github.com/DBD-SQLite/DBD-SQLite synced 2025-06-07 14:19:10 -04:00

DBD-SQLite: avoid tweak if dbname is ':memory:'

This commit is contained in:
Kenichi Ishigaki 2009-04-15 20:44:23 +00:00
parent 497126b058
commit dfd5fc6f14

View file

@ -65,7 +65,7 @@ sub connect {
# To avoid unicode and long file name problems on Windows,
# convert to the shortname if the file (or parent directory) exists.
if ( $^O eq 'MSWin32' ) {
if ( $^O eq 'MSWin32' and $real ne ':memory:') {
require Win32;
require File::Basename;
my ($file, $dir, $suffix) = File::Basename::fileparse($real);