[siesta-commit] siesta/lib/Siesta/Storage DBI.pm,1.15,1.16

[prev] [thread] [next] [lurker] [Date index for 2002/09/09]

From: muttley
Subject: [siesta-commit] siesta/lib/Siesta/Storage DBI.pm,1.15,1.16
Date: 12:16 on 09 Sep 2002
Update of /cvsroot/siesta/siesta/lib/Siesta/Storage
In directory usw-pr-cvs1:/tmp/cvs-serv27048/lib/Siesta/Storage

Modified Files:
	DBI.pm 
Log Message:
Some fixing


Index: DBI.pm
===================================================================
RCS file: /cvsroot/siesta/siesta/lib/Siesta/Storage/DBI.pm,v
retrieving revision 1.15
retrieving revision 1.16
diff -u -d -r1.15 -r1.16
--- DBI.pm	9 Sep 2002 08:42:40 -0000	1.15
+++ DBI.pm	9 Sep 2002 11:16:45 -0000	1.16
@@ -31,7 +31,6 @@
                                   map { "$_ = '$where{$_}'" } keys %where)
                  ) if %where;
 
-
     return map {
         my %foo;
         @foo{@columns} = @$_;
@@ -362,11 +361,13 @@
     $user_id ||= '';
     $list_id ||= '';
 
-    my @results = $self->_get_rows(table  => 'config',
-                                   where  => { user_id   => $user_id,
+    my $where = { user_id   => $user_id,
                                                list_id   => $list_id,
                                                key       => $key,
-                                               namespace => $namespace },
+                                               namespace => $namespace };
+
+    my @results = $self->_get_rows(table  => 'config',
+                                   where  => $where, 
                                    columns => ['value']);
 
     return $results[0]->{value};



Generated at 13:57 on 01 Jul 2004 by mariachi 0.52