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

(-)a/tools/inventory.pl (-2 / +3 lines)
Lines 405-411 if (defined $input->param('CSVexport') && $input->param('CSVexport') eq 'on'){ Link Here
405
        my ( $table, $column ) = split '\.', $key;
405
        my ( $table, $column ) = split '\.', $key;
406
        push @translated_keys, NormalizeString($columns->{$table}->{$column} // '');
406
        push @translated_keys, NormalizeString($columns->{$table}->{$column} // '');
407
    }
407
    }
408
    push @translated_keys, 'problem' if $uploadbarcodes;
408
    push @translated_keys, 'Problem' if $uploadbarcodes;
409
409
410
    $csv->combine(@translated_keys);
410
    $csv->combine(@translated_keys);
411
    print $csv->string, "\n";
411
    print $csv->string, "\n";
Lines 428-433 if (defined $input->param('CSVexport') && $input->param('CSVexport') eq 'on'){ Link Here
428
                $errstr .= "no barcode,";
428
                $errstr .= "no barcode,";
429
            } elsif( $key eq 'checkedout' ) {
429
            } elsif( $key eq 'checkedout' ) {
430
                $errstr .= "checked out,";
430
                $errstr .= "checked out,";
431
            } elsif( $key eq 'out_of_order' ) {
432
                $errstr .= "shelved out of order,";
431
            }
433
            }
432
        }
434
        }
433
        $errstr =~ s/,$//;
435
        $errstr =~ s/,$//;
434
- 

Return to bug 22135