projects
/
koha.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (from parent 1:
e3d0b51
)
BUG: GetLoanLength gets reference for branchcode
author
Dobrica Pavlinusic
<dpavlin@rot13.org>
Tue, 26 Mar 2019 17:20:34 +0000
(18:20 +0100)
committer
Dobrica Pavlinusic
<dpavlin@rot13.org>
Tue, 26 Mar 2019 17:20:55 +0000
(18:20 +0100)
C4/Circulation.pm
patch
|
blob
|
history
diff --git
a/C4/Circulation.pm
b/C4/Circulation.pm
index
7ab1db7
..
ee9ca5f
100644
(file)
--- a/
C4/Circulation.pm
+++ b/
C4/Circulation.pm
@@
-1534,6
+1534,13
@@
Get loan length for an itemtype, a borrower type and a branch
sub GetLoanLength {
my ( $borrowertype, $itemtype, $branchcode ) = @_;
sub GetLoanLength {
my ( $borrowertype, $itemtype, $branchcode ) = @_;
+
+ # FIXME FFZG -- submit bug to koha
+ if ( ref($branchcode) ) {
+ Carp::cluck("$branchcode");
+ $branchcode = 'FFZG';
+ warn "FIXME branchcode = $branchcode";
+ }
my $dbh = C4::Context->dbh;
my $sth = $dbh->prepare(qq{
SELECT issuelength, lengthunit, renewalperiod
my $dbh = C4::Context->dbh;
my $sth = $dbh->prepare(qq{
SELECT issuelength, lengthunit, renewalperiod