diff options
| author | Matthew Somerville <matthew-github@dracos.co.uk> | 2015-02-13 12:24:34 +0000 |
|---|---|---|
| committer | Matthew Somerville <matthew-github@dracos.co.uk> | 2015-02-13 12:24:34 +0000 |
| commit | 0db002a977d00d0a6e11333e190de4746e009bfb (patch) | |
| tree | e754e071d99d3eed7618fe32c004196a8a8f3bd3 /perllib/FixMyStreet/Geocode/Zurich.pm | |
| parent | 3571f96251df08dd8a9dda3ec4e1fadf30d6c63d (diff) | |
| parent | 0dc3e4f2c0b6e90c2b67fab5aaf7c9c3d2b1f971 (diff) | |
Merge branch 'issues/684-expire-geocache'
Diffstat (limited to 'perllib/FixMyStreet/Geocode/Zurich.pm')
| -rw-r--r-- | perllib/FixMyStreet/Geocode/Zurich.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perllib/FixMyStreet/Geocode/Zurich.pm b/perllib/FixMyStreet/Geocode/Zurich.pm index 1f0b4fc16..d0355e1e5 100644 --- a/perllib/FixMyStreet/Geocode/Zurich.pm +++ b/perllib/FixMyStreet/Geocode/Zurich.pm @@ -66,7 +66,7 @@ sub string { my $cache_dir = FixMyStreet->config('GEO_CACHE') . 'zurich/'; my $cache_file = $cache_dir . md5_hex($s); my $result; - if (-s $cache_file) { + if (-s $cache_file && -M $cache_file <= 7) { $result = retrieve($cache_file); } else { my $search = SOAP::Data->name('search' => $s)->type(''); |