use C4::Output;
use C4::Auth;
use C4::Koha;
-use C4::Branch;
use C4::Letters;
use C4::Members;
use C4::Overdues;
my $branch = $input->param('branch');
$branch =
defined $branch ? $branch
- : C4::Context->preference('DefaultToLoggedInLibraryOverdueTriggers') ? C4::Branch::mybranch()
+ : C4::Context->preference('DefaultToLoggedInLibraryOverdueTriggers') ? C4::Context::mybranch()
: Koha::Libraries->search->count() == 1 ? undef
: undef;
$branch ||= q{};
foreach my $bor (keys %temphash){
# get category name if we need it for an error message
- my $bor_category = GetBorrowercategory($bor);
- my $bor_category_name = defined($bor_category) ? $bor_category->{description} : $bor;
+ my $bor_category = Koha::Patron::Categories->find($bor);
+ my $bor_category_name = $bor_category ? $bor_category->description : $bor;
# Do some Checking here : delay1 < delay2 <delay3 all of them being numbers
# Raise error if not true
$input_saved = 1;
}
}
-my $branchloop = GetBranchesLoop($branch);
my $letters = C4::Letters::GetLettersAvailableForALibrary(
{
$template->param(
table => ( @first or @second or @third ? 1 : 0 ),
- branchloop => $branchloop,
branch => $branch,
tabs => \@tabs,
message_transport_types => $message_transport_types,