[Catalyst-commits] r6453 - in trunk/Catalyst-View-Email/t: .
lib/TestApp/Controller
jshirley at dev.catalyst.perl.org
jshirley at dev.catalyst.perl.org
Fri Jun 1 01:43:48 GMT 2007
Author: jshirley
Date: 2007-06-01 01:43:48 +0100 (Fri, 01 Jun 2007)
New Revision: 6453
Modified:
trunk/Catalyst-View-Email/t/05template.t
trunk/Catalyst-View-Email/t/lib/TestApp/Controller/Root.pm
Log:
Better test cases, removing my email address.
Modified: trunk/Catalyst-View-Email/t/05template.t
===================================================================
--- trunk/Catalyst-View-Email/t/05template.t 2007-06-01 00:40:52 UTC (rev 6452)
+++ trunk/Catalyst-View-Email/t/05template.t 2007-06-01 00:43:48 UTC (rev 6453)
@@ -1,6 +1,6 @@
use strict;
use warnings;
-use Test::More tests => 5;
+use Test::More tests => 10;
use Email::Send::Test;
use FindBin;
@@ -21,8 +21,8 @@
cmp_ok(@parts, '==', 2, 'got parts');
is($parts[0]->content_type, 'text/plain; charset="us-ascii"', 'text/plain ok');
-like($parts[0]->body, qr/jshirley\@picturetrail.com on $time/, 'got content back');
+like($parts[0]->body, qr/test-email\@example.com on $time/, 'got content back');
is($parts[1]->content_type, 'text/html; charset="us-ascii"', 'text/html ok');
-like($parts[1]->body, qr{<em>jshirley\@picturetrail.com</em> on $time}, 'got content back');
+like($parts[1]->body, qr{<em>test-email\@example.com</em> on $time}, 'got content back');
#like($emails[0]->body, qr/$time/, 'Got our email');
Modified: trunk/Catalyst-View-Email/t/lib/TestApp/Controller/Root.pm
===================================================================
--- trunk/Catalyst-View-Email/t/lib/TestApp/Controller/Root.pm 2007-06-01 00:40:52 UTC (rev 6452)
+++ trunk/Catalyst-View-Email/t/lib/TestApp/Controller/Root.pm 2007-06-01 00:43:48 UTC (rev 6453)
@@ -15,8 +15,8 @@
my $time = $c->req->params->{time} || time;
$c->stash->{email} = {
- to => 'jshirley at picturetrail.com',
- from => 'no-reply at toeat.com',
+ to => 'test-email at example.com',
+ from => 'no-reply at example.com',
subject => 'Email Test',
body => "Email Sent at: $time"
};
@@ -37,8 +37,8 @@
$c->stash->{time} = $c->req->params->{time} || time;
$c->stash->{email} = {
- to => 'jshirley at picturetrail.com',
- from => 'no-reply at toeat.com',
+ to => 'test-email at example.com',
+ from => 'no-reply at example.com',
subject => 'Just a test',
content_type => 'multipart/alternative',
templates => [
More information about the Catalyst-commits
mailing list