diff options
-rwxr-xr-x | web/index.cgi | 9 |
1 files changed, 8 insertions, 1 deletions
diff --git a/web/index.cgi b/web/index.cgi index e876794f2..2359b9ac2 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.203 2008-07-10 09:10:52 matthew Exp $ +# $Id: index.cgi,v 1.204 2008-07-31 10:49:03 matthew Exp $ use strict; use Standard; @@ -755,6 +755,13 @@ sub display_problem { $input{x} ||= 0; $input{x} += 0; $input{y} ||= 0; $input{y} += 0; + # Some council with bad email software + if ($input{id} =~ /^3D\d+$/) { + $input{id} =~ s/^3D//; + print $q->redirect(-location => 'http://www.fixmystreet.com/?id=' . $input{id}, -status => 301); + return ''; + } + # Get all information from database return display_location($q, 'Unknown problem ID') if $input{id} =~ /\D/; my $problem = Problems::fetch_problem($input{id}); |