[siesta-commit] siesta/t 10plugin_subscribe.t,1.1,1.2

[prev] [thread] [next] [lurker] [Date index for 2002/08/26]

From: clampr
Subject: [siesta-commit] siesta/t 10plugin_subscribe.t,1.1,1.2
Date: 18:34 on 26 Aug 2002
Update of /cvsroot/siesta/siesta/t
In directory usw-pr-cvs1:/tmp/cvs-serv12574/t

Modified Files:
	10plugin_subscribe.t 
Log Message:
change the imagined api of reply (implementing it next)

Index: 10plugin_subscribe.t
===================================================================
RCS file: /cvsroot/siesta/siesta/t/10plugin_subscribe.t,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -d -r1.1 -r1.2
--- 10plugin_subscribe.t	24 Aug 2002 17:52:08 -0000	1.1
+++ 10plugin_subscribe.t	26 Aug 2002 17:34:52 -0000	1.2
@@ -15,13 +15,13 @@
 my $mail = Test::MockObject->new
   ->mock( list  => sub { $list } )
   ->mock( from  => sub { 'suzanne@lab' } )
-  ->mock( reply => sub { $reply = join '', @_ } );
+  ->mock( reply => sub { shift; $reply = { @_ }->{body} } );
 
 ok( $plugin->process( $mail ), "request handled" );
-like( $reply, qr/You have been/, "subscribed suzanne" );
+like( $reply, qr/You have been successfully subscribed to escapees/, "subscribed suzanne" );
 
 $mail->mock( from => sub { 'jay@jail' } );
 ok( $plugin->process( $mail ) );
-like( $reply, qr/You could not be/, "subscribing jay failed" );
+like( $reply, qr/You could not be subscribed to escapees./, "subscribing jay failed" );
 
 1;




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