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

(-)a/tools/inventory.pl (-2 / +1 lines)
Lines 349-355 if (defined $input->param('CSVexport') && $input->param('CSVexport') eq 'on'){ Link Here
349
    $csv->combine(@translated_keys);
349
    $csv->combine(@translated_keys);
350
    print $csv->string, "\n";
350
    print $csv->string, "\n";
351
351
352
    my @keys = qw/ title author barcode itemnumber homebranch location itemcallnumber notforloan lost damaged withdrawn stocknumber /;
352
    my @keys = qw/ title author barcode itemnumber homebranch location itemcallnumber notforloan itemlost damaged withdrawn stocknumber /;
353
    for my $item ( @$loop ) {
353
    for my $item ( @$loop ) {
354
        my @line;
354
        my @line;
355
        for my $key (@keys) {
355
        for my $key (@keys) {
356
- 

Return to bug 20098