Add notes support to create/update

Signed-off-by: Mike Rylander <mrylander@gmail.com>

diff --git a/Open-ILS/src/perlmods/lib/OpenILS/Application/Curbside.pm b/Open-ILS/src/perlmods/lib/OpenILS/Application/Curbside.pm
index 28c03a2..ae11d81 100644 (file)
--- 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);