From 7c6051136f2513b1858e17ad02a0b420eba9c3eb Mon Sep 17 00:00:00 2001 From: Andrii Veremeienko Date: Sun, 26 Sep 2021 18:06:51 +0300 Subject: [PATCH] Bug 29114: Trim whitespace before the barcode The solution was to add regexp which trimming all whitespaces. How to test: 1. Go to the koha/virtualshelves/shelves.pl; 2. Add new list or edit existing one; 3. Start adding new items; 4. In the "Barcode" field add barcode(s) with whitespaces before them; 5. Observe that it wasn't added as the barcode isn't recognized because of whitespaces; 6. Apply the patch; 7. Repeat step 4; 8. Observe that the item was successfully added; --- virtualshelves/shelves.pl | 1 + 1 file changed, 1 insertion(+) diff --git a/virtualshelves/shelves.pl b/virtualshelves/shelves.pl index 25f2127b1c..7879e27fe9 100755 --- a/virtualshelves/shelves.pl +++ b/virtualshelves/shelves.pl @@ -154,6 +154,7 @@ if ( $op eq 'add_form' ) { if ( $shelf->can_biblios_be_added( $loggedinuser ) ) { my @barcodes = split /\n/, $barcodes; # Entries are effectively passed in as a separated list foreach my $barcode (@barcodes){ + $barcode =~ s/^\s+//; # trim all whitespaces at the beginning $barcode =~ s/\r$//; # strip any naughty return chars next if $barcode eq ''; my $item = Koha::Items->find({barcode => $barcode}); -- 2.17.1