[open-ils-commits] [GIT] Evergreen ILS branch master updated. 30a064631af68e2b715c5ab3b65e30dab403703f

[Evergreen Git]

This is an automated email from the git hooks/post-receive script. It was
generated because a ref change was pushed to the repository containing
the project "Evergreen ILS".

The branch, master has been updated
       via  30a064631af68e2b715c5ab3b65e30dab403703f (commit)
       via  505e46bd6d843629fbcb822abd2d6eac6036d6e0 (commit)
      from  19e5d9750d5132cefdd78122fd5b7f8e58d50612 (commit)

Those revisions listed above that are new to this repository have
not appeared on any other notification email; so we list those
revisions in full, below.

- Log -----------------------------------------------------------------
commit 30a064631af68e2b715c5ab3b65e30dab403703f
Author: Bill Erickson <berickxx at gmail.com>
Date:   Thu Sep 6 10:24:14 2018 -0400

    LP#1774277 Acq requests live test vandelay repair
    
    Acq requests test now logs in with a workstation since under the covers
    vandelay (used for acq imports) requires a workstation on the new
    tracker tables.
    
    Signed-off-by: Bill Erickson <berickxx at gmail.com>
    Signed-off-by: Ben Shum <ben at evergreener.net>

diff --git a/Open-ILS/src/perlmods/live_t/22-acq-requests.t b/Open-ILS/src/perlmods/live_t/22-acq-requests.t
index 2fc3d89..52c6f7f 100644
--- a/Open-ILS/src/perlmods/live_t/22-acq-requests.t
+++ b/Open-ILS/src/perlmods/live_t/22-acq-requests.t
@@ -5,15 +5,35 @@ use OpenILS::Utils::TestUtils;
 use OpenILS::Utils::CStoreEditor qw/:funcs/;
 use OpenILS::Application::Acq::Order;
 
+use constant WORKSTATION_LIB => 4;
+use constant WORKSTATION_NAME => 'BR1-test-22-acq-reqs';
+
 diag("Tests ACQ purchase requests");
 
 my $script = OpenILS::Utils::TestUtils->new();
 $script->bootstrap;
+my $e = new_editor();
+$e->init;
+
+my $workstation = $e->search_actor_workstation(
+    {name => WORKSTATION_NAME, owning_lib => WORKSTATION_LIB})->[0];
+
+if (!$workstation) {
+    $script->authenticate({
+        username => 'admin',
+        password => 'demo123',
+        type => 'staff'
+    });
+
+    my $ws = $script->register_workstation(WORKSTATION_NAME, WORKSTATION_LIB);
+    $script->logout();
+}
 
 $script->authenticate({
     username => 'admin',
     password => 'demo123',
-    type => 'staff'
+    type => 'staff',
+    workstation => WORKSTATION_NAME
 });
 
 my $ses = $script->session('open-ils.storage');

commit 505e46bd6d843629fbcb822abd2d6eac6036d6e0
Author: Bill Erickson <berickxx at gmail.com>
Date:   Thu Sep 6 10:03:46 2018 -0400

    LP#1635354 Invoice close date perl live test
    
    Update Perl live test script to inspect invoice close dates instead of
    the now-defunct 'complete' field.
    
    Signed-off-by: Bill Erickson <berickxx at gmail.com>
    Signed-off-by: Ben Shum <ben at evergreener.net>

diff --git a/Open-ILS/src/perlmods/live_t/16-acq-invoicing.t b/Open-ILS/src/perlmods/live_t/16-acq-invoicing.t
index 82f9ec0..81381a9 100644
--- a/Open-ILS/src/perlmods/live_t/16-acq-invoicing.t
+++ b/Open-ILS/src/perlmods/live_t/16-acq-invoicing.t
@@ -26,7 +26,6 @@ $invoice->receiver(1);
 $invoice->provider(1);
 $invoice->shipper(1);
 $invoice->inv_ident(rand());
-$invoice->complete('f');
 
 my $entry = Fieldmapper::acq::invoice_entry->new;
 $entry->isnew(1);
@@ -57,7 +56,8 @@ is($inv_debit->encumbrance, 't',
     'Debit is still encumbered after invoice create');
 
 # Close the invoice.  LP#1333254. 
-$invoice->complete('t');
+$invoice->close_date('2018-01-01');
+$invoice->closed_by(1); # admin
 $invoice->ischanged(1);
 
 $req = $acq_ses->request(
@@ -65,7 +65,7 @@ $req = $acq_ses->request(
 
 $invoice = $req->recv->content;
 
-is($invoice->complete, 't', 'Invoice is closed');
+isnt($invoice->close_date, undef, 'Invoice is closed');
 
 $inv_debit = $e->retrieve_acq_fund_debit($inv_debit->id);
 
@@ -73,7 +73,8 @@ is($inv_debit->encumbrance, 'f',
     'Debit is disencumbered after invoice close');
 
 # re-open the invoice
-$invoice->complete('f');
+$invoice->clear_close_date;
+$invoice->clear_closed_by;
 $invoice->ischanged(1);
 
 $req = $acq_ses->request(

-----------------------------------------------------------------------

Summary of changes:
 Open-ILS/src/perlmods/live_t/16-acq-invoicing.t |    9 +++++----
 Open-ILS/src/perlmods/live_t/22-acq-requests.t  |   22 +++++++++++++++++++++-
 2 files changed, 26 insertions(+), 5 deletions(-)


hooks/post-receive
-- 
Evergreen ILS