aboutsummaryrefslogtreecommitdiffstats
path: root/perllib/Utils.pm
diff options
context:
space:
mode:
authorMatthew Somerville <matthew@fury.ukcod.org.uk>2011-04-02 01:43:30 +0100
committerMatthew Somerville <matthew@fury.ukcod.org.uk>2011-04-02 01:43:30 +0100
commitb62f054c6b219973de587b254e534d7df53c39d9 (patch)
tree2da49a5f52373ca78f8baf01bf0f965a0b910fe3 /perllib/Utils.pm
parente591ef105c5996e95f2e7738b324c25b3708f0be (diff)
Have fixed categories in London, from Report-It API.
Diffstat (limited to 'perllib/Utils.pm')
-rw-r--r--perllib/Utils.pm29
1 files changed, 29 insertions, 0 deletions
diff --git a/perllib/Utils.pm b/perllib/Utils.pm
index 21994d20b..c16a02cd4 100644
--- a/perllib/Utils.pm
+++ b/perllib/Utils.pm
@@ -107,4 +107,33 @@ sub truncate_coordinate {
return $out;
}
+sub london_categories {
+ return {
+ 'Abandoned vehicle' => 'AbandonedVehicle',
+ 'Car parking' => 'Parking',
+ 'Dangerous structure' => 'DangerousStructure',
+ 'Dead animal' => 'DeadAnimal',
+ 'Dumped cylinder' => 'DumpedCylinder',
+ 'Dumped rubbish' => 'DumpedRubbish',
+ 'Flyposting' => 'FlyPosting',
+ 'Graffiti' => 'Graffiti',
+ 'Litter bin' => 'LitterBin',
+ 'Public toilet' => 'PublicToilet',
+ 'Refuse collection' => 'RefuseCollection',
+ 'Road or pavement defect' => 'Road',
+ 'Road or pavement obstruction' => 'Obstruction',
+ 'Skip problem' => 'Skip',
+ 'Street cleaning' => 'StreetCleaning',
+ 'Street drainage' => 'StreetDrainage',
+ 'Street furniture' => 'StreetFurniture',
+ 'Street needs gritting' => 'StreetGritting',
+ 'Street lighting' => 'StreetLighting',
+ 'Street sign' => 'StreetSign',
+ 'Traffic light' => 'TrafficLight',
+ 'Tree (dangerous)' => 'DangerousTree',
+ 'Tree (fallen branches)' => 'FallenTree',
+ 'Untaxed vehicle' => 'UntaxedVehicle',
+ };
+}
+
1;