--- trunk/lib/Strix/Schema.pm 2008/06/29 00:49:50 15 +++ trunk/lib/Strix/Schema.pm 2008/06/30 07:12:56 35 @@ -7,10 +7,16 @@ use Storable; use Data::Dump qw/dump/; +use URI::Escape; -my $schema_file = 'var/schema.storable'; +my $dsn = 'dbi:Pg:dbname=new'; +$dsn = 'dbi:SQLite:dbname=./var/strix.sqlite'; -my $source = Fey::DBIManager::Source->new( dsn => 'dbi:Pg:dbname=new' ); +my $schema_file = 'var/schema.' . uri_escape( $dsn ); + +warn "Database $dsn schema cache $schema_file\n"; + +my $source = Fey::DBIManager::Source->new( dsn => $dsn ); my $schema; if ( -e $schema_file ) {