tweak removal of whitespace from barcodes

[koha.git] / circ / circulation.pl

diff --git a/circ/circulation.pl b/circ/circulation.pl
index d89c637..fc5d4e5 100755 (executable)
--- a/circ/circulation.pl
+++ b/circ/circulation.pl
@@ -112,7 +112,7 @@ if (C4::Context->preference("AutoLocation") ne 1) { # FIXME: string comparison t
 }
 
 my $barcode        = $query->param('barcode') || '';
-$barcode =~  s/^[ \t]+|[ \t]+$//g; # remove leading/trailing whitespace
+$barcode =~  s/^\s*|\s*$//g; # remove leading/trailing whitespace
 
 $barcode = barcodedecode($barcode) if( $barcode && C4::Context->preference('itemBarcodeInputFilter'));
 my $stickyduedate  = $query->param('stickyduedate');