[prev] [thread] [next] [lurker] [Date index for 2003/03/16]
Update of /cvsroot/siesta/siesta/t In directory sc8-pr-cvs1:/tmp/cvs-serv11387/t Modified Files: 15defer.t Log Message: more defer hacking Index: 15defer.t =================================================================== RCS file: /cvsroot/siesta/siesta/t/15defer.t,v retrieving revision 1.4 retrieving revision 1.5 diff -u -d -r1.4 -r1.5 --- 15defer.t 16 Mar 2003 15:33:04 -0000 1.4 +++ 15defer.t 16 Mar 2003 15:39:43 -0000 1.5 @@ -23,7 +23,7 @@ my @deferred = $list->deferred; is( scalar @deferred, 0, "we have no deferred messages" ); -ok( $message->defer( for => 'the hell of it' ), "deferred a message" ); +ok( $message->defer( for => 'the hell of it', from => 'test@foo' ), "deferred a message" ); @deferred = $list->deferred; is( scalar @deferred, 1, "we have 1 deferred message" );
Generated at 13:57 on 01 Jul 2004 by mariachi 0.52