diff options
Diffstat (limited to 'perllib/Open311/Endpoint/Integration/Warwick.pm')
-rw-r--r-- | perllib/Open311/Endpoint/Integration/Warwick.pm | 47 |
1 files changed, 0 insertions, 47 deletions
diff --git a/perllib/Open311/Endpoint/Integration/Warwick.pm b/perllib/Open311/Endpoint/Integration/Warwick.pm deleted file mode 100644 index bc57a8e8c..000000000 --- a/perllib/Open311/Endpoint/Integration/Warwick.pm +++ /dev/null @@ -1,47 +0,0 @@ -package Open311::Endpoint::Integration::Warwick; -use Web::Simple; -extends 'Open311::Endpoint::Integration::Exor'; -use Open311::Endpoint::Service::Exor; - -has '+default_service_notice' => ( - default => 'Warwickshire Open311 Endpoint', -); - -sub services { - # TODO, get this from ::Exor - my @services = ( - # [ BR => 'Bridges' ], - # [ CD => 'Carriageway Defect' ], - # [ CD => 'Roads/Highways' ], - # [ DR => 'Drainage' ], - # [ DS => 'Debris/Spillage' ], - # [ FE => 'Fences' ], - # [ 'F D' => 'Pavements' ], - # [ GC => 'Gully & Catchpits' ], - # [ IS => 'Ice/Snow' ], - # [ MD => 'Mud & Debris' ], - # [ MH => 'Manhole' ], - # [ OS => 'Oil Spillage' ], - # [ OT => 'Other' ], - [ PO => 'Pothole' ], - # [ PD => 'Property Damage' ], - # [ RM => 'Road Marking' ], - # [ SN => 'Road traffic signs' ], - # [ SP => 'Traffic' ], - # [ UT => 'Utilities' ], - # [ VG => 'Vegetation' ], - ); - return map { - my ($code, $name) = @$_; - Open311::Endpoint::Service::Exor->new( - service_code => $code, - service_name => $name, - description => $name, - type => 'realtime', - keywords => [qw/ /], - group => 'highways', - ), - } @services; -} - -1; |