diff options
author | Chris Mytton <self@hecticjeff.net> | 2013-09-13 12:12:14 +0100 |
---|---|---|
committer | Chris Mytton <self@hecticjeff.net> | 2013-09-13 12:12:14 +0100 |
commit | b44f9edab53f59fb442e5ee4db28cb25408c652c (patch) | |
tree | e7cd62bd148a5332e1ec625dda6c3bc6b09ceb62 /perllib/Open311/PopulateServiceList.pm | |
parent | 2099ac31a4410f2cf8e1c7d31dc35cdd9ac1e070 (diff) | |
parent | 94ac7786132a538a5742ba325eb7fe9eff89cfc9 (diff) |
Merge branch 'master' into oxfordshire-usability-recommendations
Diffstat (limited to 'perllib/Open311/PopulateServiceList.pm')
-rw-r--r-- | perllib/Open311/PopulateServiceList.pm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/perllib/Open311/PopulateServiceList.pm b/perllib/Open311/PopulateServiceList.pm index 7990abfbf..c5fc4a506 100644 --- a/perllib/Open311/PopulateServiceList.pm +++ b/perllib/Open311/PopulateServiceList.pm @@ -42,8 +42,9 @@ sub process_body { my $list = $open311->get_service_list; unless ( $list ) { my $id = $self->_current_body->id; + my $mapit_url = mySociety::Config::get('MAPIT_URL'); my $areas = join( ",", keys %{$self->_current_body->areas} ); - warn "Body $id for areas $areas - http://mapit.mysociety.org/areas/$areas.html - did not return a service list\n" + warn "Body $id for areas $areas - $mapit_url/areas/$areas.html - did not return a service list\n" if $self->verbose >= 1; return; } |