diff options
Diffstat (limited to 'perllib')
-rw-r--r-- | perllib/FixMyStreet/Cobrand/TfL.pm | 11 |
1 files changed, 11 insertions, 0 deletions
diff --git a/perllib/FixMyStreet/Cobrand/TfL.pm b/perllib/FixMyStreet/Cobrand/TfL.pm index 150ae6ea3..f4e7fb14a 100644 --- a/perllib/FixMyStreet/Cobrand/TfL.pm +++ b/perllib/FixMyStreet/Cobrand/TfL.pm @@ -116,4 +116,15 @@ sub fetch_area_children { return $areas; } +sub available_permissions { + my $self = shift; + + my $perms = $self->next::method(); + + delete $perms->{Problems}->{report_edit_priority}; + delete $perms->{Bodies}->{responsepriority_edit}; + + return $perms; +} + 1; |