From c3f6f26c35ecdab035f8e0035ee8eb73cd5fe99c Mon Sep 17 00:00:00 2001
From: Nick Clemens <nick@bywatersolutions.com>
Date: Fri, 24 Feb 2017 01:29:22 +0000
Subject: [PATCH] Bug 7663 (QA Followup)

    Ignore empty entries

Signed-off-by: Jonathan Druart <jonathan.druart@bugs.koha-community.org>

Signed-off-by: Kyle M Hall <kyle@bywatersolutions.com>
---
 virtualshelves/shelves.pl | 1 +
 1 file changed, 1 insertion(+)

diff --git a/virtualshelves/shelves.pl b/virtualshelves/shelves.pl
index 3e03e6d9be..a6d04ceeef 100755
--- a/virtualshelves/shelves.pl
+++ b/virtualshelves/shelves.pl
@@ -145,6 +145,7 @@ if ( $op eq 'add_form' ) {
                 my @barcodes = split /\n/, $barcodes; # Entries are effectively passed in as a <cr> separated list
                 foreach my $barcode (@barcodes){
                     $barcode =~ s/\r$//; # strip any naughty return chars
+                    next if $barcode eq '';
                     my $item = GetItem( 0, $barcode);
                     if (defined $item && $item->{itemnumber}) {
                         my $biblio = GetBiblioFromItemNumber( $item->{itemnumber} );
-- 
2.39.5