aboutsummaryrefslogtreecommitdiffstats
path: root/perllib/Open311/GetServiceRequests.pm
diff options
context:
space:
mode:
authorStruan Donald <struan@exo.org.uk>2018-12-14 15:03:20 +0000
committerStruan Donald <struan@exo.org.uk>2019-01-04 10:35:30 +0000
commit8ce5719937b7c589a4c5f65ed5b2ceb9637b9fcf (patch)
tree41d9189a3d7f7cc28d72c01fd64e1e19b88f07a5 /perllib/Open311/GetServiceRequests.pm
parent9e60fac91d78220c351f6cd9c96dcb09e043d99f (diff)
[Open311] handle non_public field when fetching requests
If there is <non_public>1</non_public> tag in an incoming service request then set the created report to non_public.
Diffstat (limited to 'perllib/Open311/GetServiceRequests.pm')
-rw-r--r--perllib/Open311/GetServiceRequests.pm3
1 files changed, 3 insertions, 0 deletions
diff --git a/perllib/Open311/GetServiceRequests.pm b/perllib/Open311/GetServiceRequests.pm
index 66f7e497d..a8f3788d5 100644
--- a/perllib/Open311/GetServiceRequests.pm
+++ b/perllib/Open311/GetServiceRequests.pm
@@ -160,6 +160,8 @@ sub create_problems {
my $state = $open311->map_state($request->{status});
+ my $non_public = $request->{non_public} ? 1 : 0;
+
my $problem = $self->schema->resultset('Problem')->new(
{
user => $self->system_user,
@@ -182,6 +184,7 @@ sub create_problems {
send_method_used => 'Open311',
category => $contact,
send_questionnaire => 0,
+ non_public => $non_public,
}
);