[prev] [thread] [next] [lurker] [Date index for 2002/09/05]
Update of /cvsroot/siesta/siesta/t In directory usw-pr-cvs1:/tmp/cvs-serv27287/t Modified Files: 07list.t Log Message: Fix to get rid of crufty config stuff. Index: 07list.t =================================================================== RCS file: /cvsroot/siesta/siesta/t/07list.t,v retrieving revision 1.16 retrieving revision 1.17 diff -u -d -r1.16 -r1.17 --- 07list.t 5 Sep 2002 12:39:07 -0000 1.16 +++ 07list.t 5 Sep 2002 13:13:07 -0000 1.17 @@ -1,6 +1,6 @@ #!perl -w use strict; -use Test::More tests => 26; +use Test::More tests => 23; use Test::MockObject; use Siesta; use Siesta::List; @@ -50,9 +50,4 @@ ok( $list->add_member( 'bob@xxxxxxxx.xxxxxxxxxx' ), 'was able to add bob' ); is( scalar $list->members, $count + 1 ); ok( $list->is_member( 'bob@xxxxxxxx.xxxxxxxxxx' ) ); - -# config -is ($list->get_config('bar', 'a'), 'b', "getting the config"); -ok ($list->set_config('bar', 'a', 'whatever'), "setting new config"); -is ($list->get_config('bar', 'a'), 'whatever', "getting the new config");
Generated at 13:57 on 01 Jul 2004 by mariachi 0.52