View | Details | Raw Unified | Return to bug 29114
Collapse All | Expand All

(-)a/virtualshelves/shelves.pl (-1 / +1 lines)
Lines 154-159 if ( $op eq 'add_form' ) { Link Here
154
            if ( $shelf->can_biblios_be_added( $loggedinuser ) ) {
154
            if ( $shelf->can_biblios_be_added( $loggedinuser ) ) {
155
                my @barcodes = split /\n/, $barcodes; # Entries are effectively passed in as a <cr> separated list
155
                my @barcodes = split /\n/, $barcodes; # Entries are effectively passed in as a <cr> separated list
156
                foreach my $barcode (@barcodes){
156
                foreach my $barcode (@barcodes){
157
                    $barcode =~ s/^\s*|\s*$//g; # remove leading/trailing whitespace
157
                    $barcode =~ s/\r$//; # strip any naughty return chars
158
                    $barcode =~ s/\r$//; # strip any naughty return chars
158
                    next if $barcode eq '';
159
                    next if $barcode eq '';
159
                    my $item = Koha::Items->find({barcode => $barcode});
160
                    my $item = Koha::Items->find({barcode => $barcode});
160
- 

Return to bug 29114