[prev] [thread] [next] [lurker] [Date index for 2002/09/09]
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