reserve and virtualshelves (leftovers) - Dates.pm integration and warnings fixes.
Signed-off-by: Chris Cormack <crc@liblime.com> Signed-off-by: Joshua Ferraro <jmf@liblime.com>
This commit is contained in:
parent
28159f04de
commit
21a875ce36
|
|
@ -36,7 +36,7 @@ use C4::Reserves;
|
|||
use C4::Biblio;
|
||||
use C4::Koha;
|
||||
use C4::Circulation;
|
||||
use C4::Date;
|
||||
use C4::Dates;
|
||||
use C4::Members;
|
||||
|
||||
my $dbh = C4::Context->dbh;
|
||||
|
|
@ -351,7 +351,7 @@ foreach my $biblioitemnumber (@biblioitemnumbers) {
|
|||
# existingreserves building
|
||||
my @reserveloop;
|
||||
my $branches = GetBranches();
|
||||
my ( $count, $reserves ) = GetReservesFromBiblionumber($biblionumber);
|
||||
( $count, $reserves ) = GetReservesFromBiblionumber($biblionumber);
|
||||
foreach my $res ( sort { $a->{found} cmp $b->{found} } @$reserves ) {
|
||||
my %reserve;
|
||||
my @optionloop;
|
||||
|
|
|
|||
|
|
@ -198,7 +198,7 @@ SWITCH: {
|
|||
}
|
||||
}
|
||||
|
||||
my $shelflist = GetShelves( $loggedinuser, 2 );
|
||||
$shelflist = GetShelves( $loggedinuser, 2 );
|
||||
my $color = '';
|
||||
my @shelvesloop;
|
||||
my $numberCanManage = 0;
|
||||
|
|
@ -224,7 +224,6 @@ foreach my $element ( sort keys %$shelflist ) {
|
|||
|
||||
$template->param(
|
||||
shelvesloop => \@shelvesloop,
|
||||
|
||||
numberCanManage => $numberCanManage,
|
||||
);
|
||||
|
||||
|
|
|
|||
Loading…
Reference in New Issue