[prev] [thread] [next] [lurker] [Date index for 2002/08/28]
Update of /cvsroot/siesta/siesta/lib/Siesta/Storage In directory usw-pr-cvs1:/tmp/cvs-serv15205/lib/Siesta/Storage Modified Files: DBI.pm Table.pm Log Message: bigass ->connect ->storage refactor Index: DBI.pm =================================================================== RCS file: /cvsroot/siesta/siesta/lib/Siesta/Storage/DBI.pm,v retrieving revision 1.2 retrieving revision 1.3 diff -u -d -r1.2 -r1.3 --- DBI.pm 26 Aug 2002 22:50:20 -0000 1.2 +++ DBI.pm 28 Aug 2002 10:06:12 -0000 1.3 @@ -9,6 +9,14 @@ use Siesta::Storage::Table::List_Users; use Siesta::Storage::Table::List_Plugins; +sub new { + my $class = shift; + my ($db, $user, $pass) = @_; + Siesta::Storage::Table->set_db('Main', $db, $user, $pass, + { RaiseError => 1 } ); + bless {}, $class; +} + sub load_user { my $self = shift; my $user = shift; Index: Table.pm =================================================================== RCS file: /cvsroot/siesta/siesta/lib/Siesta/Storage/Table.pm,v retrieving revision 1.5 retrieving revision 1.6 diff -u -d -r1.5 -r1.6 --- Table.pm 23 Aug 2002 18:35:31 -0000 1.5 +++ Table.pm 28 Aug 2002 10:06:12 -0000 1.6 @@ -2,12 +2,6 @@ use strict; use Class::DBI; use base 'Class::DBI'; -use Siesta::Config; - -my $DBFILE = $Siesta::Config::DBFILE; - -Siesta::Storage::Table->set_db('Main', "dbi:SQLite:$DBFILE", '', '', - { RaiseError => 1 } ); # there must be a better way than this ... __PACKAGE__->make_filter(search2 => '%s = ? AND %s = ?');
Generated at 13:57 on 01 Jul 2004 by mariachi 0.52