gitea
/
Koha-clms
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Bug 10527: remove disused routine C4::Branch::get_branch_code_from_name 

This routine is not in used and does not make sense. It should not be
used later.

Signed-off-by: Srdjan <srdjan@catalyst.net.nz>
Signed-off-by: Kyle M Hall <kyle@bywatersolutions.com>
Passes koha-qa.pl, not references to get_branch_code_from_name found.

Signed-off-by: Galen Charlton <gmc@esilibrary.com>
(cherry picked from commit 7d93064906)

Signed-off-by: Tomas Cohen Arazi <tomascohen@gmail.com>
(cherry picked from commit aa15f7031b)
Signed-off-by: Bernardo Gonzalez Kriegel <bgkriegel@gmail.com>
(cherry picked from commit aa15f7031b)

Conflicts:
	C4/Branch.pm
Signed-off-by: Chris Hall <followingthepath@gmail.com>
(cherry picked from commit 1eb41a81ee)
This commit is contained in:
Jonathan Druart 2013-07-02 12:56:21 +02:00 committed by Chris Hall
parent aa9f664c0b
commit 3801a7a0e1
6 changed files with 1 additions and 15 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
C4/Branch.pm
View File

@ -47,7 +47,7 @@ BEGIN {
&CheckCategoryUnique
&mybranch
);
@EXPORT_OK = qw( &onlymine &mybranch get_branch_code_from_name );
@EXPORT_OK = qw( &onlymine &mybranch );
}
=head1 NAME
@ -571,15 +571,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;
}
1;
__END__

1
labels/label-edit-batch.pl
View File

@ -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;

1
labels/label-manage.pl
View File

@ -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;

1
patroncards/edit-batch.pl
View File

@ -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;

1
patroncards/manage.pl
View File

@ -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;

1
tools/manage-marc-import.pl
View File

@ -35,7 +35,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";