diff options
| author | Hakim Cassimally <hakim@mysociety.org> | 2014-03-04 15:12:33 +0000 |
|---|---|---|
| committer | Hakim Cassimally <hakim@mysociety.org> | 2014-04-10 13:47:04 +0000 |
| commit | 62c2c7c5ee458b8c35c66e6f8992df960eb6f0eb (patch) | |
| tree | 8467c6fe5ee4aaf486007010a527d53102de62f9 /perllib/FixMyStreet.pm | |
| parent | b82228ce014cc87866d976eeb3ce6e454e87c336 (diff) | |
bin/geocode script for testing geocoding
Run bin/geocode -h for options.
Has:
* configurable cobrand / config-file / geocoder
* some diagnostics for missing cobrand
Minor fixes rebased into this commit:
* bin/geocode error if no --cobrand passed
* bin/geocode docs and accept GEOCODER as string
Notable TODOs remaining:
* reverse geocoding, to double check that latitude actually maps
somewhere useful (and is within Cobrand's boundaries)
* diagnosis of relevant CONFIG settings
* flag to disable caching
Diffstat (limited to 'perllib/FixMyStreet.pm')
| -rw-r--r-- | perllib/FixMyStreet.pm | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/perllib/FixMyStreet.pm b/perllib/FixMyStreet.pm index cc5286bbb..de55e0070 100644 --- a/perllib/FixMyStreet.pm +++ b/perllib/FixMyStreet.pm @@ -12,8 +12,10 @@ use Sub::Override; use mySociety::Config; use mySociety::DBHandle; +my $CONF_FILE = $ENV{FMS_OVERRIDE_CONFIG} || 'general'; + # load the config file and store the contents in a readonly hash -mySociety::Config::set_file( __PACKAGE__->path_to("conf/general") ); +mySociety::Config::set_file( __PACKAGE__->path_to("conf/${CONF_FILE}") ); Readonly::Hash my %CONFIG, %{ mySociety::Config::get_list() }; =head1 NAME |