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

(-)a/tools/inventory.pl (-2 / +3 lines)
Lines 395-401 if (defined $input->param('CSVexport') && $input->param('CSVexport') eq 'on'){ Link Here
395
        my ( $table, $column ) = split '\.', $key;
395
        my ( $table, $column ) = split '\.', $key;
396
        push @translated_keys, NormalizeString($columns->{$table}->{$column} // '');
396
        push @translated_keys, NormalizeString($columns->{$table}->{$column} // '');
397
    }
397
    }
398
    push @translated_keys, 'problem' if $uploadbarcodes;
398
    push @translated_keys, 'Problem' if $uploadbarcodes;
399
399
400
    $csv->combine(@translated_keys);
400
    $csv->combine(@translated_keys);
401
    print $csv->string, "\n";
401
    print $csv->string, "\n";
Lines 418-423 if (defined $input->param('CSVexport') && $input->param('CSVexport') eq 'on'){ Link Here
418
                $errstr .= "no barcode,";
418
                $errstr .= "no barcode,";
419
            } elsif( $key eq 'checkedout' ) {
419
            } elsif( $key eq 'checkedout' ) {
420
                $errstr .= "checked out,";
420
                $errstr .= "checked out,";
421
            } elsif( $key eq 'out_of_order' ) {
422
                $errstr .= "shelved out of order,";
421
            }
423
            }
422
        }
424
        }
423
        $errstr =~ s/,$//;
425
        $errstr =~ s/,$//;
424
- 

Return to bug 22135