Permalink
Find file
Fetching contributors…
Cannot retrieve contributors at this time
20 lines (19 sloc) 437 Bytes
use File::Spec;
use File::Basename qw(dirname);
my $basedir = File::Spec->rel2abs(File::Spec->catdir(dirname(__FILE__), '..'));
my $dbpath;
if ( -d '/home/dotcloud/') {
$dbpath = "/home/dotcloud/deployment.db";
} else {
$dbpath = File::Spec->catfile($basedir, 'db', 'deployment.db');
}
+{
'DBI' => [
"dbi:SQLite:dbname=$dbpath",
'',
'',
+{
sqlite_unicode => 1,
}
],
};