Koha-community/Koha
13
7
Fork 0
Code Issues Releases Wiki Activity

Bug 8761 Dont inadvertantly use slices

Browse source 
Assignment to a single element slice is better written
as a scalar - This generates a compile time warning as it
can lead to odd behaviour see perldiag for details
This corrects some cases which were added in a recent
commit

Signed-off-by: Chris Cormack <chris@bigballofwax.co.nz>
Signed-off-by: Paul Poulain <paul.poulain@biblibre.com>
This commit is contained in:
Colin Campbell 2012-09-11 18:49:35 +01:00 committed by Paul Poulain
parent 4e5ea71a54
commit 223bf0099f
1 changed files with 4 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

8
C4/Circulation.pm
View file

@ -982,16 +982,16 @@ sub CanBookBeIssued {
# Index points to the next value
my $restrictionyear = 0;
if (($take <= $#values) && ($take >= 0)){
$restrictionyear += @values[$take];
$restrictionyear += $values[$take];
}
if ($restrictionyear > 0) {
if ( $borrower->{'dateofbirth'} ) {
my @alloweddate = split /-/,$borrower->{'dateofbirth'} ;
@alloweddate[0] += $restrictionyear;
$alloweddate[0] += $restrictionyear;
#Prevent runime eror on leap year (invalid date)
if ((@alloweddate[1] == 2) && (@alloweddate[2] == 29)) {
@alloweddate[2] = 28;
if (($alloweddate[1] == 2) && ($alloweddate[2] == 29)) {
$alloweddate[2] = 28;
}
if ( Date_to_Days(Today) < Date_to_Days(@alloweddate) -1 ) {