aboutsummaryrefslogtreecommitdiffstats
path: root/web
diff options
context:
space:
mode:
Diffstat (limited to 'web')
-rwxr-xr-xweb/index.cgi4
-rwxr-xr-xweb/rss.cgi5
2 files changed, 6 insertions, 3 deletions
diff --git a/web/index.cgi b/web/index.cgi
index 9674bd519..77374d1c4 100755
--- a/web/index.cgi
+++ b/web/index.cgi
@@ -6,7 +6,7 @@
# Copyright (c) 2006 UK Citizens Online Democracy. All rights reserved.
# Email: matthew@mysociety.org. WWW: http://www.mysociety.org
#
-# $Id: index.cgi,v 1.171 2008-01-15 09:55:07 matthew Exp $
+# $Id: index.cgi,v 1.172 2008-01-25 17:02:29 matthew Exp $
use strict;
use Standard;
@@ -377,6 +377,8 @@ sub display_form {
# Map was clicked on
$pin_x = Page::click_to_tile($pin_tile_x, $pin_x);
$pin_y = Page::click_to_tile($pin_tile_y, $pin_y, 1);
+ $input{x} ||= $pin_x-1;
+ $input{y} ||= $pin_y-1;
$px = Page::tile_to_px($pin_x, $input{x});
$py = Page::tile_to_px($pin_y, $input{y});
$easting = Page::tile_to_os($pin_x);
diff --git a/web/rss.cgi b/web/rss.cgi
index bd75f0ce0..d15da1763 100755
--- a/web/rss.cgi
+++ b/web/rss.cgi
@@ -6,7 +6,7 @@
# Copyright (c) 2007 UK Citizens Online Democracy. All rights reserved.
# Email: matthew@mysociety.org. WWW: http://www.mysociety.org
#
-# $Id: rss.cgi,v 1.18 2007-08-29 23:03:16 matthew Exp $
+# $Id: rss.cgi,v 1.19 2008-01-25 17:02:29 matthew Exp $
use strict;
use Standard;
@@ -40,7 +40,8 @@ sub main {
} elsif ($type eq 'all_problems') {
mySociety::Alert::generate_rss($type, '');
} else {
- throw Error::Simple('Unknown alert type') unless $type;
+ print $q->redirect('http://www.fixmystreet.com/alert');
+ exit;
}
}
Page::do_fastcgi(\&main);