diff options
| author | matthew <matthew> | 2009-08-10 10:59:31 +0000 |
|---|---|---|
| committer | matthew <matthew> | 2009-08-10 10:59:31 +0000 |
| commit | ef16f8703f8ebd954bf448c7ea434a43a8b2b76f (patch) | |
| tree | 18737f6e40b6f90ce0b948100ad17ebe3e607ebf | |
| parent | bd51303f4504b0a5c7b10903cec008d6512aa6f9 (diff) | |
Spacing.
| -rw-r--r-- | perllib/Page.pm | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/perllib/Page.pm b/perllib/Page.pm index 4ceb945d4..0fb3c5278 100644 --- a/perllib/Page.pm +++ b/perllib/Page.pm @@ -6,7 +6,7 @@ # Copyright (c) 2006 UK Citizens Online Democracy. All rights reserved. # Email: matthew@mysociety.org; WWW: http://www.mysociety.org/ # -# $Id: Page.pm,v 1.153 2009-08-07 21:20:37 matthew Exp $ +# $Id: Page.pm,v 1.154 2009-08-10 10:59:31 matthew Exp $ # package Page; @@ -776,10 +776,10 @@ sub geocode_string { if (!$js) { $error = _('Sorry, we could not parse that location. Please try again.'); - } elsif ($js !~ /"code": *200/) { + } elsif ($js !~ /"code" *: *200/) { $error = _('Sorry, we could not find that location.'); } elsif ($js =~ /}, *{/) { # Multiple - while ($js =~ /"address": *"(.*?)",\s*"AddressDetails":.*?"PostalCodeNumber": *"(.*?)"/g) { + while ($js =~ /"address" *: *"(.*?)",\s*"AddressDetails" *:.*?"PostalCodeNumber" *: *"(.*?)"/gs) { my $address = $1; my $pc = $2; $address =~ s/UK/$pc, UK/; |