[Catalyst-commits] r12549 - Catalyst-View-Email/branches/email-sender-porting/t

[dhoss at dev.catalyst.perl.org]

Author: dhoss
Date: 2010-01-08 22:44:59 +0000 (Fri, 08 Jan 2010)
New Revision: 12549

Modified:
   Catalyst-View-Email/branches/email-sender-porting/t/04basic.t
Log:
removed some debug stuff

Modified: Catalyst-View-Email/branches/email-sender-porting/t/04basic.t
===================================================================
--- Catalyst-View-Email/branches/email-sender-porting/t/04basic.t	2010-01-08 22:44:27 UTC (rev 12548)
+++ Catalyst-View-Email/branches/email-sender-porting/t/04basic.t	2010-01-08 22:44:59 UTC (rev 12549)
@@ -14,9 +14,6 @@
 ok( ($response = request("/email?time=$time"))->is_success, 'request ok');
 
 my @emails = Email::Sender::Simple->default_transport->deliveries;
-use Data::Dumper;
-warn "Emails: " . Dumper @emails;
-warn "Body: " . $emails[0]->{'email'}->[0]->body;
 is( scalar @emails, 1, "got emails");
 isa_ok( $emails[0]->{'email'}, 'Email::Abstract', 'email is ok' );
 like($emails[0]->{'email'}->[0]->body, qr/$time/, 'Got our email');