1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
|
package FixMyStreet::Cobrand::Greenwich;
use parent 'FixMyStreet::Cobrand::UKCouncils';
use strict;
use warnings;
sub council_id { return 2493; }
sub council_area { return 'Greenwich'; }
sub council_name { return 'Royal Borough of Greenwich'; }
sub council_url { return 'greenwich'; }
sub base_url {
return FixMyStreet->config('BASE_URL') if FixMyStreet->config('STAGING_SITE');
return 'https://fix.royalgreenwich.gov.uk';
}
sub example_places {
return ( 'SE18 6HQ', "Woolwich Road" );
}
sub enter_postcode_text {
my ($self) = @_;
return 'Enter a Royal Greenwich postcode, or street name and area';
}
sub disambiguate_location {
my $self = shift;
my $string = shift;
my $town = 'Greenwich';
# as it's the requested example location, try to avoid a disambiguation page
$town .= ', SE10 0EF' if $string =~ /^\s*woolwich\s+r(?:oa)?d\s*(?:,\s*green\w+\s*)?$/i;
return {
%{ $self->SUPER::disambiguate_location() },
town => $town,
centre => '51.4743770385684,0.0555696523982184',
span => '0.089851200483885,0.150572372434415',
bounds => [ 51.423679096602, -0.0263872255863898, 51.5135302970859, 0.124185146848025 ],
};
}
sub pin_colour {
my ( $self, $p, $context ) = @_;
return 'grey' if $p->state eq 'not responsible';
return 'green' if $p->is_fixed || $p->is_closed;
return 'red' if $p->state eq 'confirmed';
return 'yellow';
}
sub contact_email {
my $self = shift;
return join( '@', 'fixmystreet', 'royalgreenwich.gov.uk' );
}
1;
|