diff options
author | matthew <matthew> | 2009-11-04 15:16:58 +0000 |
---|---|---|
committer | matthew <matthew> | 2009-11-04 15:16:58 +0000 |
commit | c2bf72b2eeda3a6fb1cf77fb9aedbdf424914dfd (patch) | |
tree | 65780cec6bc637383ebd9c5ae3b6305b97f68b6b /perllib/Page.pm | |
parent | a9497797dfff93014f73292534297494dcf5f634 (diff) |
Remove unneeded front_page hook, can call template code directly.
Template possibility for check email step.
Diffstat (limited to 'perllib/Page.pm')
-rw-r--r-- | perllib/Page.pm | 15 |
1 files changed, 13 insertions, 2 deletions
diff --git a/perllib/Page.pm b/perllib/Page.pm index b42c27291..9ff45fe02 100644 --- a/perllib/Page.pm +++ b/perllib/Page.pm @@ -6,7 +6,7 @@ # Copyright (c) 2006 UK Citizens Online Democracy. All rights reserved. # Email: matthew@mysociety.org; WWW: http://www.mysociety.org/ # -# $Id: Page.pm,v 1.198 2009-11-04 13:11:06 matthew Exp $ +# $Id: Page.pm,v 1.199 2009-11-04 15:16:58 matthew Exp $ # package Page; @@ -244,7 +244,8 @@ sub template_include { (my $file = __FILE__) =~ s{/[^/]*?$}{}; my $template_file = $file . $template_root . $template; $template_file = $file . template_root($q, 1) . $template unless -e $template_file; - + return undef unless -e $template_file; + $template = Text::Template->new( SOURCE => $template_file, DELIMITERS => ['{{', '}}'], @@ -680,6 +681,7 @@ sub send_email { $action = 'your expression of interest will not be registered'; $worry = "we'll hang on to your expression of interest while you're checking your email."; } + my $out = sprintf(_(<<EOF), $action, $worry); <h1>Nearly Done! Now check your email...</h1> <p>The confirmation email <strong>may</strong> take a few minutes to arrive — <em>please</em> be patient.</p> @@ -688,6 +690,15 @@ sub send_email { if you do not, %s.</p> <p>(Don't worry — %s)</p> EOF + + my $cobrand = Page::get_cobrand($q); + my %vars = ( + action => $action, + worry => $worry, + url_home => Cobrand::url($cobrand, '/', $q), + ); + my $cobrand_email = Page::template_include('check-email', $q, Page::template_root($q), %vars); + return $cobrand_email if $cobrand_email; return $out; } |