[prev] [thread] [next] [lurker] [Date index for 2003/03/15]
Update of /cvsroot/siesta/siesta/t In directory sc8-pr-cvs1:/tmp/cvs-serv11281/t Modified Files: 07user.t Log Message: refactor get_users Index: 07user.t =================================================================== RCS file: /cvsroot/siesta/siesta/t/07user.t,v retrieving revision 1.11 retrieving revision 1.12 diff -u -d -r1.11 -r1.12 --- 07user.t 15 Mar 2003 20:15:53 -0000 1.11 +++ 07user.t 15 Mar 2003 21:43:13 -0000 1.12 @@ -61,14 +61,14 @@ my $us = Siesta::User->new_from_hash( email => 'test@test' ); ok( $us->save, "saved 'test\@test'" ); my $flag = 0; -foreach my $user ( Siesta->storage->get_users ) { +foreach my $user ( Siesta->users ) { $flag++ if ( $user->email eq 'test@test' ); } is( $flag, 1, "inserted" ); ok( $us->forename('test') ); ok( $us->save ); $flag = 0; -foreach my $user ( Siesta->storage->get_users ) { +foreach my $user ( Siesta->users ) { $flag++ if ( $user->email eq 'test@test' ); }
Generated at 13:57 on 01 Jul 2004 by mariachi 0.52