LP#1296937: (follow-up) make $ids_only be the last parameter for ->charged_items()
authorGalen Charlton <gmc@esilibrary.com>
Tue, 20 May 2014 15:46:47 +0000 (08:46 -0700)
committerGalen Charlton <gmc@esilibrary.com>
Tue, 20 May 2014 15:50:03 +0000 (08:50 -0700)
This change ensures that if a site fails to upgrade SIPServer at the
same time that they upgrade Evergreen, the renew all message won't
break on them.

Signed-off-by: Galen Charlton <gmc@esilibrary.com>
Open-ILS/src/perlmods/lib/OpenILS/SIP/Patron.pm
Open-ILS/src/perlmods/lib/OpenILS/SIP/Transaction/RenewAll.pm

index e1a4b9e..7e998f8 100644 (file)
@@ -461,7 +461,7 @@ sub hold_items {
 
 
     # all of my open holds
-    my $holds = $self->{editor}->search_action_hold_request({ 
+    my $holds = $self->{editor}->search_action_hold_request({
         usr => $self->{user}->id, 
         fulfillment_time => undef, 
         cancel_time => undef 
@@ -741,7 +741,7 @@ sub __circ_to_title {
 
 # force_bc -- return barcode data regardless of msg64_summary_datatype
 sub charged_items {
-    my ($self, $start, $end, $ids_only, $force_bc) = shift;
+    my ($self, $start, $end, $force_bc, $ids_only) = shift;
 
     $self->__patron_items_info();
 
index 5b199b2..675d6ad 100644 (file)
@@ -31,7 +31,7 @@ sub do_renew_all {
     my $self = shift;
     my $sip = shift;
 
-    my $barcodes = $self->patron->charged_items(undef, undef, 0, 1);
+    my $barcodes = $self->patron->charged_items(undef, undef, 1);
 
     syslog('LOG_INFO', "OILS: RenewalAll for user ".
         $self->patron->{id} ." and items [@$barcodes]");