diff options
Diffstat (limited to 'bin/geocode')
-rwxr-xr-x | bin/geocode | 9 |
1 files changed, 7 insertions, 2 deletions
diff --git a/bin/geocode b/bin/geocode index 2b85ff572..2559f7a3c 100755 --- a/bin/geocode +++ b/bin/geocode @@ -6,8 +6,6 @@ geocode - commandline tool to test geocoders =head1 SYNOPSIS - $ eval `perl setenv.pl`, or call with bin/cron-wrapper - $ bin/geocode --geocoder=Bing --cobrand=bromley "Glebe Rd" # ... if your conf/general.yml supplies GEOCODER: @@ -24,6 +22,13 @@ use strict; use warnings; require 5.8.0; +BEGIN { + use File::Basename qw(dirname); + use File::Spec; + my $d = dirname(File::Spec->rel2abs($0)); + require "$d/../setenv.pl"; +} + use Data::Dumper; use Pod::Usage; use feature 'say'; |