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

(-)a/acqui/basketgroup.pl (-2 / +2 lines)
Lines 330-338 if ( $op eq "add" ) { Link Here
330
# export a closed basketgroup in csv
330
# export a closed basketgroup in csv
331
#
331
#
332
    my $basketgroupid = $input->param('basketgroupid');
332
    my $basketgroupid = $input->param('basketgroupid');
333
    my $basketgroup = GetBasketgroup($basketgroupid);
333
    print $input->header(
334
    print $input->header(
334
        -type       => 'text/csv',
335
        -type       => 'text/csv',
335
        -attachment => 'basketgroup' . $basketgroupid . '.csv',
336
        -attachment => ( $basketgroup->{name} || $basketgroupid ) . '.csv'
336
    );
337
    );
337
    print GetBasketGroupAsCSV( $basketgroupid, $input );
338
    print GetBasketGroupAsCSV( $basketgroupid, $input );
338
    exit;
339
    exit;
339
- 

Return to bug 23721