aboutsummaryrefslogtreecommitdiffstats
path: root/perllib/FixMyStreet/App/Controller/Alert.pm
diff options
context:
space:
mode:
authorStruan Donald <struan@exo.org.uk>2011-05-12 11:09:09 +0100
committerStruan Donald <struan@exo.org.uk>2011-05-12 11:09:09 +0100
commitd5fa6de56ce14cd32877fc451d2355900eb5b649 (patch)
tree6047ef30a77e46ee2a167007a299ebf716d27f85 /perllib/FixMyStreet/App/Controller/Alert.pm
parent629441ccda35f5956f01907d3c43a9a1847f5885 (diff)
removed old commented out code
Diffstat (limited to 'perllib/FixMyStreet/App/Controller/Alert.pm')
-rw-r--r--perllib/FixMyStreet/App/Controller/Alert.pm28
1 files changed, 2 insertions, 26 deletions
diff --git a/perllib/FixMyStreet/App/Controller/Alert.pm b/perllib/FixMyStreet/App/Controller/Alert.pm
index d22cc710f..53defe05e 100644
--- a/perllib/FixMyStreet/App/Controller/Alert.pm
+++ b/perllib/FixMyStreet/App/Controller/Alert.pm
@@ -44,12 +44,7 @@ sub list : Path('list') : Args(0) {
$c->stash->{rznvy} ||= $c->user->email;
}
- # my ($q, @errors) = @_;
- # my @vars = qw(pc rznvy lat lon);
- # my %input = map { $_ => scalar $q->param($_) } @vars;
- # my %input_h = map { $_ => $q->param($_) ? ent($q->param($_)) : '' } @vars;
- #
- # Try to create a location for whatever we have
+ # Try to create a location for whatever we have
unless ( $c->forward('/location/determine_location_from_coords')
|| $c->forward('/location/determine_location_from_pc') )
{
@@ -74,10 +69,6 @@ sub list : Path('list') : Args(0) {
$c->log->debug($_)
for ( $c->stash->{pc}, $c->stash->{latitude}, $c->stash->{longitude} );
-#
-# my $errors = '';
-# $errors = '<ul class="error"><li>' . join('</li><li>', @errors) . '</li></ul>' if @errors;
-#
$c->stash->{council_check_action} = 'alert';
unless ( $c->forward('/council/load_and_check_councils_and_wards') ) {
$c->go('index');
@@ -101,20 +92,7 @@ sub list : Path('list') : Args(0) {
);
$c->stash->{cobrand_form_elements} = $c->cobrand->form_elements('alerts');
-#
-# my $checked = '';
-# $checked = ' checked' if $q->param('feed') && $q->param('feed') eq "local:$lat:$lon";
-# my $cobrand_form_elements = Cobrand::form_elements($cobrand, 'alerts', $q);
-# my $pics = Cobrand::recent_photos($cobrand, 5, $lat, $lon, $dist);
-# $pics = '<div id="alert_photos">' . $q->h2(_('Photos of recent nearby reports')) . $pics . '</div>' if $pics;
-
- # my $form_action = Cobrand::url($cobrand, '/alert', $q);
- #$cobrand_form_elements
- #$pics
- #
- #EOF
- # $out .= $errors;
- # $out .= <<EOF;
+
$c->stash->{rss_feed_id} =
sprintf( 'local:%s:%s', $c->stash->{latitude}, $c->stash->{longitude} );
@@ -135,8 +113,6 @@ sub list : Path('list') : Args(0) {
$c->stash->{rss_feed_uri} = $rss_feed;
-# my $default_link = Cobrand::url($cobrand, "/alert?type=local;feed=local:$lat:$lon", $q);
-
$c->stash->{rss_feed_2k} = $c->cobrand->uri( $rss_feed . '/2', $c->fake_q );
$c->stash->{rss_feed_5k} = $c->cobrand->uri( $rss_feed . '/5', $c->fake_q );
$c->stash->{rss_feed_10k} =