aboutsummaryrefslogtreecommitdiffstats
path: root/perllib/FixMyStreet/App/View/Web.pm
diff options
context:
space:
mode:
authorMatthew Somerville <matthew@mysociety.org>2011-05-26 18:54:48 +0100
committerMatthew Somerville <matthew@mysociety.org>2011-05-26 18:54:48 +0100
commit67cfdc9bf5948bec4c4f88e19ac1b4e7370a995f (patch)
treea8ea53899f31f6d99194cd3a05cdd5d61e68760a /perllib/FixMyStreet/App/View/Web.pm
parent4308906bc2695f1fd034b8f5f1a6be657e6d4dfe (diff)
Questionnaire submission code.
Diffstat (limited to 'perllib/FixMyStreet/App/View/Web.pm')
-rw-r--r--perllib/FixMyStreet/App/View/Web.pm12
1 files changed, 6 insertions, 6 deletions
diff --git a/perllib/FixMyStreet/App/View/Web.pm b/perllib/FixMyStreet/App/View/Web.pm
index 61d7c6ca5..8f1aaa085 100644
--- a/perllib/FixMyStreet/App/View/Web.pm
+++ b/perllib/FixMyStreet/App/View/Web.pm
@@ -16,7 +16,7 @@ __PACKAGE__->config(
ENCODING => 'utf8',
render_die => 1,
expose_methods => [
- 'loc', 'nget', 'tprintf', 'display_crossell_advert', 'prettify_epoch',
+ 'loc', 'nget', 'tprintf', 'display_crosssell_advert', 'prettify_epoch',
'split_into_lines',
],
);
@@ -70,16 +70,16 @@ sub tprintf {
return sprintf $format, @args;
}
-=head2 display_crossell_advert
+=head2 display_crosssell_advert
- [% display_crossell_advert( email, name ) %]
+ [% display_crosssell_advert( email, name ) %]
Displays a crosssell advert if permitted by the cobrand.
=cut
-sub display_crossell_advert {
- my ( $self, $c, $email, $name ) = @_;
+sub display_crosssell_advert {
+ my ( $self, $c, $email, $name, %data ) = @_;
return unless $c->cobrand->allow_crosssell_adverts();
@@ -87,7 +87,7 @@ sub display_crossell_advert {
my $q = { site => $c->cobrand->moniker, };
$q->{site} = 'fixmystreet' if $q->{site} eq 'default';
- return CrossSell::display_advert( $q, $email, $name );
+ return CrossSell::display_advert( $q, $email, $name, %data );
}
=head2 Page::prettify_epoch