Koha-community/Koha
13
7
Fork 0
Code Issues Releases Wiki Activity

Bug 35518: Tidy the moved blocks

Browse source 
This patch just tidies the moved blocks to get us past the QA script
check.

Signed-off-by: Martin Renvoize <martin.renvoize@ptfs-europe.com>
(cherry picked from commit b577b65670)
Signed-off-by: Fridolin Somers <fridolin.somers@biblibre.com>
(cherry picked from commit 1f182d45ab)
Signed-off-by: Frédéric Demians <f.demians@tamil.fr>
This commit is contained in:
Martin Renvoize 2024-02-08 15:55:43 +00:00 committed by Frédéric Demians
parent 1460974627
commit d44a697788
1 changed files with 6 additions and 6 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
circ/circulation.pl
View file

@ -114,7 +114,7 @@ my ( $template, $loggedinuser, $cookie ) = get_template_and_user (
my $override_high_holds = $query->param('override_high_holds'); my $override_high_holds = $query->param('override_high_holds');
my $override_high_holds_tmp = $query->param('override_high_holds_tmp'); my $override_high_holds_tmp = $query->param('override_high_holds_tmp');
my $sessionID = $query->cookie("CGISESSID") ; my $sessionID = $query->cookie("CGISESSID");
my $session = get_session($sessionID); my $session = get_session($sessionID);
my $userenv = C4::Context->userenv; my $userenv = C4::Context->userenv;
@ -124,10 +124,10 @@ my $desk_id = $userenv->{"desk_id"} || '';
my $findborrower; my $findborrower;
my $autoswitched; my $autoswitched;
if (C4::Context->preference("AutoSwitchPatron") && $barcode) { if ( C4::Context->preference("AutoSwitchPatron") && $barcode ) {
my $new_barcode = $barcode; my $new_barcode = $barcode;
Koha::Plugins->call( 'patron_barcode_transform', \$new_barcode ); Koha::Plugins->call( 'patron_barcode_transform', \$new_barcode );
if (Koha::Patrons->search( { cardnumber => $new_barcode} )->count() > 0) { if ( Koha::Patrons->search( { cardnumber => $new_barcode } )->count() > 0 ) {
$findborrower = $barcode; $findborrower = $barcode;
undef $barcode; undef $barcode;
undef $borrowernumber; undef $borrowernumber;