@@ -, +, @@ Before, all spaces were removed. ' white space ' became '(whitespace)' After, only external spaces were remove ' white space ' became '(white space)' --- circ/branchtransfers.pl | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) --- a/circ/branchtransfers.pl +++ a/circ/branchtransfers.pl @@ -108,8 +108,8 @@ elsif ( $request eq 'KillReserved' ) { my @trsfitemloop; my $transfered; my $barcode = $query->param('barcode'); -# strip whitespace -defined $barcode and $barcode =~ s/\s*//g; # FIXME: barcodeInputFilter +# remove leading/trailing whitespace +defined $barcode and $barcode =~ s/^\s*|\s*$//g; # FIXME: barcodeInputFilter # warn "barcode : $barcode"; if ($barcode) { --