diff options
Diffstat (limited to 'web')
-rwxr-xr-x | web/index.cgi | 4 | ||||
-rwxr-xr-x | web/rss.cgi | 5 |
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); |