diff options
author | Struan Donald <struan@exo.org.uk> | 2011-05-04 14:45:06 +0100 |
---|---|---|
committer | Struan Donald <struan@exo.org.uk> | 2011-05-04 14:45:06 +0100 |
commit | 2025cde75a554048b0d3ac60c70029b98914ed37 (patch) | |
tree | af821ed890b936bc67236bcc7dc92371135e1bae | |
parent | 6bca29716bd28f5724527e7a3037c47c225d0896 (diff) |
added in commented out code from alert.cgi for reference
-rw-r--r-- | perllib/FixMyStreet/App/Controller/Alert.pm | 34 |
1 files changed, 34 insertions, 0 deletions
diff --git a/perllib/FixMyStreet/App/Controller/Alert.pm b/perllib/FixMyStreet/App/Controller/Alert.pm index 3e5c4e128..73e54a8a2 100644 --- a/perllib/FixMyStreet/App/Controller/Alert.pm +++ b/perllib/FixMyStreet/App/Controller/Alert.pm @@ -26,6 +26,40 @@ Show the alerts page sub alert_index :Path :Args(0) { my ( $self, $c ) = @_; +# my $q = shift; +# my $cobrand = Page::get_cobrand($q); +# my $error = shift; +# my $errors = ''; +# $errors = '<ul class="error"><li>' . $error . '</li></ul>' if $error; +# +# my $form_action = Cobrand::url(Page::get_cobrand($q), '/alert', $q); +# my $cobrand_form_elements = Cobrand::form_elements($cobrand, 'alerts', $q); +# my $cobrand_extra_data = Cobrand::extra_data($cobrand, $q); +# +# $out .= $errors . qq(<form method="get" action="$form_action">); +# $out .= $q->p($pc_label, '<input type="text" name="pc" value="' . $input_h{pc} . '"> +#<input type="submit" value="' . $submit_text . '">'); +# $out .= $cobrand_form_elements; +# +# my %vars = (error => $error, +# header => $header, +# intro => $intro, +# pc_label => $pc_label, +# form_action => $form_action, +# input_h => \%input_h, +# submit_text => $submit_text, +# cobrand_form_elements => $cobrand_form_elements, +# cobrand_extra_data => $cobrand_extra_data, +# url_home => Cobrand::url($cobrand, '/', $q)); +# +# my $cobrand_page = Page::template_include('alert-front-page', $q, Page::template_root($q), %vars); +# $out = $cobrand_page if ($cobrand_page); +# +# return $out if $q->referer() && $q->referer() =~ /fixmystreet\.com/; +# my $recent_photos = Cobrand::recent_photos($cobrand, 10); +# $out .= '<div id="alert_recent">' . $q->h2(_('Some photos of recent reports')) . $recent_photos . '</div>' if $recent_photos; +# +# return $out; } |