Add Email template parts for register email sending

diff --git a/stemmaweb/lib/stemmaweb/View/Email/Template.pm b/stemmaweb/lib/stemmaweb/View/Email/Template.pm
new file mode 100644 (file)
index 0000000..91f3784
--- /dev/null
+++ b/stemmaweb/lib/stemmaweb/View/Email/Template.pm
@@ -0,0 +1,34 @@
+package stemmaweb::View::Email::Template;
+
+use strict;
+use base 'Catalyst::View::Email::Template';
+
+__PACKAGE__->config(
+    stash_key       => 'email',
+    template_prefix => ''
+);
+
+=head1 NAME
+
+stemmaweb::View::Email::Template - Templated Email View for stemmaweb
+
+=head1 DESCRIPTION
+
+View for sending template-generated email from stemmaweb. 
+
+=head1 AUTHOR
+
+A clever guy
+
+=head1 SEE ALSO
+
+L<stemmaweb>
+
+=head1 LICENSE
+
+This library is free software, you can redistribute it and/or modify
+it under the same terms as Perl itself.
+
+=cut
+
+1;

diff --git a/stemmaweb/root/src/register-plain.tt b/stemmaweb/root/src/register-plain.tt
new file mode 100644 (file)
index 0000000..517cc8c
--- /dev/null
+++ b/stemmaweb/root/src/register-plain.tt
@@ -0,0 +1,2 @@
+Thank you for registering with Stemmaweb!
+

diff --git a/stemmaweb/t/view_Email-Template.t b/stemmaweb/t/view_Email-Template.t
new file mode 100644 (file)
index 0000000..acaf00a
--- /dev/null
+++ b/stemmaweb/t/view_Email-Template.t
@@ -0,0 +1,8 @@
+use strict;
+use warnings;
+use Test::More;
+
+
+BEGIN { use_ok 'stemmaweb::View::Email::Template' }
+
+done_testing();