[siesta-commit] siesta/lib/Siesta/Storage DBI.pm,1.2,1.3 Table.pm,1.5,1.6

[prev] [thread] [next] [lurker] [Date index for 2002/08/28]

From: clampr
Subject: [siesta-commit] siesta/lib/Siesta/Storage DBI.pm,1.2,1.3 Table.pm,1.5,1.6
Date: 11:06 on 28 Aug 2002
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