[siesta-commit] siesta/t 07list.t,1.23,1.24

[prev] [thread] [next] [lurker] [Date index for 2003/03/15]

From: clampr
Subject: [siesta-commit] siesta/t 07list.t,1.23,1.24
Date: 21:39 on 15 Mar 2003
Update of /cvsroot/siesta/siesta/t
In directory sc8-pr-cvs1:/tmp/cvs-serv9889/t

Modified Files:
	07list.t 
Log Message:
refactor get_lists

Index: 07list.t
===================================================================
RCS file: /cvsroot/siesta/siesta/t/07list.t,v
retrieving revision 1.23
retrieving revision 1.24
diff -u -d -r1.23 -r1.24
--- 07list.t	15 Mar 2003 20:15:52 -0000	1.23
+++ 07list.t	15 Mar 2003 21:39:18 -0000	1.24
@@ -92,14 +92,14 @@
 my $us = Siesta::List->new_from_hash( name => 'caitlin' );
 ok( $us->save, "saved 'caitlin'" );
 $flag = 0;
-foreach my $list ( Siesta->storage->get_lists ) {
+foreach my $list ( Siesta->lists ) {
     $flag++ if $list->name eq 'caitlin';
 }
 is( $flag, 1, "inserted" );
 ok( $us->owner('test') );
 ok( $us->save );
 $flag = 0;
-foreach my $list ( Siesta->storage->get_lists ) {
+foreach my $list ( Siesta->lists ) {
     $flag++ if $list->name eq 'caitlin';
 }
 



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