diff options
author | Struan Donald <struan@exo.org.uk> | 2018-12-14 15:03:20 +0000 |
---|---|---|
committer | Struan Donald <struan@exo.org.uk> | 2019-01-04 10:35:30 +0000 |
commit | 8ce5719937b7c589a4c5f65ed5b2ceb9637b9fcf (patch) | |
tree | 41d9189a3d7f7cc28d72c01fd64e1e19b88f07a5 /perllib/Open311/GetServiceRequests.pm | |
parent | 9e60fac91d78220c351f6cd9c96dcb09e043d99f (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.pm | 3 |
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, } ); |