Adding missing files.

diff --git a/t/06config.t b/t/06config.t
new file mode 100644 (file)
index 0000000..421478a
--- /dev/null
+++ b/t/06config.t
@@ -0,0 +1,19 @@
+use strict;
+use warnings;
+use Test::More tests => 5;
+
+use Email::Send::Test;
+use FindBin;
+use lib "$FindBin::Bin/lib";
+
+use_ok('Catalyst::Test', 'TestApp');
+
+my $response;
+my $time = time;
+ok( ($response = request("/email_app_config?time=$time"))->is_success, 'request ok');
+
+my @emails = Email::Send::Test->emails;
+
+is(@emails, 1, "got emails");
+isa_ok( $emails[0], 'Email::MIME', 'email is ok' );
+like($emails[0]->body, qr/$time/, 'Got our email');

diff --git a/t/lib/TestApp/View/Email/AppConfig.pm b/t/lib/TestApp/View/Email/AppConfig.pm
new file mode 100644 (file)
index 0000000..fd9e9a8
--- /dev/null
+++ b/t/lib/TestApp/View/Email/AppConfig.pm
@@ -0,0 +1,8 @@
+package # Hide from PAUSE
+    TestApp::View::Email::AppConfig;
+
+use Email::Send::Test;
+
+use base 'Catalyst::View::Email';
+
+1;