refactor repeat code into get_email_template

1 files changed, 17 insertions, 0 deletions

diff --git a/perllib/FixMyStreet.pm b/perllib/FixMyStreet.pm
index 34c7bfe21..f3b72c4d0 100644
--- a/perllib/FixMyStreet.pm
+++ b/perllib/FixMyStreet.pm
@@ -200,4 +200,21 @@ sub configure_mysociety_dbhandle {
 
 }
 
+=head2 get_email_template
+
+=cut
+
+sub get_email_template {
+    # TODO further refactor this by just using Template path
+    my ($class, $cobrand, $lang, $template) = @_;
+
+    my $template_path = FixMyStreet->path_to( "templates", "email", $cobrand, $lang, $template )->stringify;
+    $template_path = FixMyStreet->path_to( "templates", "email", $cobrand, $template )->stringify
+        unless -e $template_path;
+    $template_path = FixMyStreet->path_to( "templates", "email", "default", $template )->stringify
+        unless -e $template_path;
+    $template = Utils::read_file( $template_path );
+    return $template;
+}
+
 1;