Bug 21486: Fix 'AU' for SIP
Signed-off-by: Colin Campbell <colin.campbell@ptfs-europe.com> Signed-off-by: Alex Buckley <alexbuckley@catalyst.net.nz> Signed-off-by: Josef Moravec <josef.moravec@gmail.com> Signed-off-by: Nick Clemens <nick@bywatersolutions.com>
This commit is contained in:
parent
df91e14135
commit
8746ca21a2
1 changed files with 7 additions and 1 deletions
|
@ -130,7 +130,13 @@ sub new {
|
|||
|
||||
# FIXME: populate fine_items recall_items
|
||||
$ilspatron{unavail_holds} = _get_outstanding_holds($kp->{borrowernumber});
|
||||
$ilspatron{items} = $patron->pending_checkouts->unblessed;
|
||||
my $pending_checkouts = $patron->pending_checkouts;
|
||||
my @items_infos;
|
||||
while ( my $c = $pending_checkouts->next ) {
|
||||
push @items_infos, $c->unblessed_all_relateds;
|
||||
}
|
||||
$ilspatron{items} = \@items_infos;
|
||||
|
||||
$self = \%ilspatron;
|
||||
$debug and warn Dumper($self);
|
||||
syslog("LOG_DEBUG", "new ILS::Patron(%s): found patron '%s'", $patron_id,$self->{id});
|
||||
|
|
Loading…
Reference in a new issue