aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorfrancis <francis>2007-06-16 14:28:36 +0000
committerfrancis <francis>2007-06-16 14:28:36 +0000
commit4f750e68255ce02a60bca39b6e641a4332c52538 (patch)
tree7755e0d47a704f0b5787a75bdf74d02c55327b5f
parent2381e164af9e79c4c7b6a979c4edb170a5870a6c (diff)
0 is false in Perl :)
-rwxr-xr-xweb/rss.cgi5
1 files changed, 2 insertions, 3 deletions
diff --git a/web/rss.cgi b/web/rss.cgi
index c0f057e21..8d9e2ef0b 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.9 2007-06-16 14:20:07 francis Exp $
+# $Id: rss.cgi,v 1.10 2007-06-16 14:28:36 francis Exp $
use strict;
require 5.8.0;
@@ -43,8 +43,7 @@ sub main {
if (!$x && !$y) {
my $lat = $q->param('lat');
my $lon = $q->param('lon');
- warn $lat, $lon;
- if ($lat && $lon) {
+ if (defined $lat && defined $lon) {
($x, $y) = mySociety::GeoUtil::wgs84_to_national_grid($lat, $lon, 'G');
}
}