Fix for bug 1626, whitespace stripped from barcodes

Signed-off-by: Joshua Ferraro <jmf@liblime.com>
This commit is contained in:
Chris Cormack 2007-12-30 16:17:04 -06:00 committed by Joshua Ferraro
parent cbd1ef5a71
commit ddd0140ef1
3 changed files with 8 additions and 0 deletions

View file

@ -105,6 +105,8 @@ my @trsfitemloop;
my %transfereditems;
my $transfered;
my $barcode = $query->param('barcode');
# strip whitespace
$barcode =~ s/\s*//g;
# warn "barcode : $barcode";
if ($barcode) {

View file

@ -111,6 +111,10 @@ $printer = C4::Context->userenv->{'branchprinter'};
}
my $barcode = $query->param('barcode') || '';
# strip whitespace
$barcode =~ s/\s*//g;
my $year = $query->param('year');
my $month = $query->param('month');
my $day = $query->param('day');

View file

@ -153,6 +153,8 @@ my $returned = 0;
my $messages;
my $issueinformation;
my $barcode = $query->param('barcode');
# strip whitespace
$barcode =~ s/\s*//g;
my $exemptfine = $query->param('exemptfine');
my $dotransfer = $query->param('dotransfer');