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

Bug 35290: (follow-up) Perltidy formatting corrections

Browse source 
Signed-off-by: Nick Clemens <nick@bywatersolutions.com>
Signed-off-by: Tomas Cohen Arazi <tomascohen@theke.io>
(cherry picked from commit 350aa94b5e)
Signed-off-by: Fridolin Somers <fridolin.somers@biblibre.com>
This commit is contained in:
Owen Leonard 2023-11-09 19:46:35 +00:00 committed by Fridolin Somers
parent 6f974adf0b
commit 95538ae640
1 changed files with 3 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
cataloguing/ysearch.pl
View file

@ -1,4 +1,4 @@
#!/usr/bin/perl
#!/usr/bin/perl
# This software is placed under the gnu General Public License, v2 (http://www.gnu.org/licenses/gpl.html)
@ -37,8 +37,8 @@ my $table = $input->param('table');
my $field = $input->param('field');
# Prevent from disclosing data
die() unless ($table eq "biblioitems");
die() unless ($field eq 'publishercode' || $field eq 'collectiontitle');
die() unless ( $table eq "biblioitems" );
die() unless ( $field eq 'publishercode' || $field eq 'collectiontitle' );
binmode STDOUT, ":encoding(UTF-8)";
print $input->header( -type => 'text/plain', -charset => 'UTF-8' );