@@ -, +, @@ --- C4/Branch.pm | 11 +---------- labels/label-edit-batch.pl | 1 - labels/label-manage.pl | 1 - patroncards/edit-batch.pl | 1 - patroncards/manage.pl | 1 - tools/manage-marc-import.pl | 1 - 6 files changed, 1 insertions(+), 15 deletions(-) --- a/C4/Branch.pm +++ a/C4/Branch.pm @@ -48,7 +48,7 @@ BEGIN { &mybranch &GetBranchesCount ); - @EXPORT_OK = qw( &onlymine &mybranch get_branch_code_from_name ); + @EXPORT_OK = qw( &onlymine &mybranch ); } =head1 NAME @@ -589,15 +589,6 @@ sub CheckBranchCategorycode { return $total; } -sub get_branch_code_from_name { - my @branch_name = @_; - my $query = "SELECT branchcode FROM branches WHERE branchname=?;"; - my $dbh = C4::Context->dbh(); - my $sth = $dbh->prepare($query); - $sth->execute(@branch_name); - return $sth->fetchrow_array; -} - sub GetBranchesCount { my $dbh = C4::Context->dbh(); my $query = "SELECT COUNT(*) AS branches_count FROM branches"; --- a/labels/label-edit-batch.pl +++ a/labels/label-edit-batch.pl @@ -26,7 +26,6 @@ use CGI; use C4::Auth qw(get_template_and_user); use C4::Output qw(output_html_with_http_headers); -use C4::Branch qw(get_branch_code_from_name); use C4::Items qw(GetItemnumberFromBarcode); use C4::Creators; use C4::Labels; --- a/labels/label-manage.pl +++ a/labels/label-manage.pl @@ -27,7 +27,6 @@ use Data::Dumper; use C4::Auth qw(get_template_and_user); use C4::Output qw(output_html_with_http_headers); -use autouse 'C4::Branch' => qw(get_branch_code_from_name); use C4::Creators; use C4::Labels; --- a/patroncards/edit-batch.pl +++ a/patroncards/edit-batch.pl @@ -27,7 +27,6 @@ use autouse 'Data::Dumper' => qw(Dumper); use C4::Auth qw(get_template_and_user); use C4::Output qw(output_html_with_http_headers); -use C4::Branch qw(get_branch_code_from_name); use C4::Creators; use C4::Patroncards; --- a/patroncards/manage.pl +++ a/patroncards/manage.pl @@ -27,7 +27,6 @@ use autouse 'Data::Dumper' => qw(Dumper); use C4::Auth qw(get_template_and_user); use C4::Output qw(output_html_with_http_headers); -use autouse 'C4::Branch' => qw(get_branch_code_from_name); use C4::Creators; use C4::Patroncards; use C4::Labels; --- a/tools/manage-marc-import.pl +++ a/tools/manage-marc-import.pl @@ -36,7 +36,6 @@ use C4::ImportBatch; use C4::Matcher; use C4::BackgroundJob; use C4::Labels::Batch; -use C4::Branch qw(get_branch_code_from_name); my $script_name = "/cgi-bin/koha/tools/manage-marc-import.pl"; --