diff options
-rw-r--r-- | perllib/Cobrands/Fiksgatami/Util.pm | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/perllib/Cobrands/Fiksgatami/Util.pm b/perllib/Cobrands/Fiksgatami/Util.pm index 9fb448be5..eba57ba92 100644 --- a/perllib/Cobrands/Fiksgatami/Util.pm +++ b/perllib/Cobrands/Fiksgatami/Util.pm @@ -34,6 +34,12 @@ sub disambiguate_location { return $s; } +sub geocoded_string_check { + my ($self, $s) = @_; + return 1 if $s =~ /, Norge/; + return 0; +} + sub area_types { return ( 'NKO', 'NFY' ); } |