69732f5c62
use C4::Koha was loaded only to call C4::Koha::get_infos_of in get_branchinfos_of the sub get_branchinfos_of was used nowhere (checked with "grep -R get_branchinfos_of *") only one reference was made to get_branchinfos_of, in reserve/request.pl, but the sub was not used in fact (maybe removed previously & silently) This patch removes sub get_branchinfos_of and use C4::Koha in C4::Branch, as well as the reference in request.pl and the t test The patch doesn't remove use C4::Branch in reserve/request.pl, as it's still used for other subroutines. Signed-off-by: Ian Walls <ian.walls@bywatersolutions.com> Signed-off-by: Chris Cormack <chrisc@catalyst.net.nz>
35 lines
814 B
Perl
35 lines
814 B
Perl
package KohaTest::Branch;
|
|
use base qw( KohaTest );
|
|
|
|
use strict;
|
|
use warnings;
|
|
|
|
use Test::More;
|
|
|
|
use C4::Branch;
|
|
sub testing_class { 'C4::Branch' };
|
|
|
|
|
|
sub methods : Test( 1 ) {
|
|
my $self = shift;
|
|
my @methods = qw( GetBranches
|
|
GetBranchName
|
|
ModBranch
|
|
GetBranchCategory
|
|
GetBranchCategories
|
|
GetCategoryTypes
|
|
GetBranch
|
|
GetBranchDetail
|
|
GetBranchesInCategory
|
|
GetBranchInfo
|
|
DelBranch
|
|
ModBranchCategoryInfo
|
|
DelBranchCategory
|
|
CheckBranchCategorycode
|
|
);
|
|
|
|
can_ok( $self->testing_class, @methods );
|
|
}
|
|
|
|
1;
|
|
|