From 55794edba02229aba14ed8f0e24271e6127f05b7 Mon Sep 17 00:00:00 2001 From: Mike Rylander Date: Fri, 29 May 2020 12:13:09 -0400 Subject: [PATCH] Add notes support to create/update Signed-off-by: Mike Rylander --- Open-ILS/src/perlmods/lib/OpenILS/Application/Curbside.pm | 8 +++++++- 1 file changed, 7 insertions(+), 1 deletion(-) diff --git a/Open-ILS/src/perlmods/lib/OpenILS/Application/Curbside.pm b/Open-ILS/src/perlmods/lib/OpenILS/Application/Curbside.pm index 28c03a20dd..ae11d81cfb 100644 --- a/Open-ILS/src/perlmods/lib/OpenILS/Application/Curbside.pm +++ b/Open-ILS/src/perlmods/lib/OpenILS/Application/Curbside.pm @@ -495,7 +495,7 @@ __PACKAGE__->register_method( ); sub create_update_appointment { - my ($self, $conn, $authtoken, $patron, $date, $time, $org) = @_; + my ($self, $conn, $authtoken, $patron, $date, $time, $org, $notes) = @_; my $mode = 'create'; $mode = 'update' if ($self->api_name =~ /update/); @@ -601,9 +601,15 @@ sub create_update_appointment { if (!$slot) { # just in case the hold-ready reactor isn't in place $slot = Fieldmapper::action::curbside->new; + $slot->isnew(1); $slot->patron($patron); $slot->org($org); + $slot->notes($notes) if ($notes); $method = 'create_action_curbside'; + } else { + $slot->notes($notes) if ($notes); + $slot->ischanged(1); + $method = 'update_action_curbside'; } $slot->slot($slot_ts); -- 2.11.0