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

(-)a/t/db_dependent/Suggestions.t (-5 / +4 lines)
Lines 485-494 subtest 'DelSuggestionsOlderThan' => sub { Link Here
485
    # Add four suggestions; note that STATUS needs uppercase (FIXME)
485
    # Add four suggestions; note that STATUS needs uppercase (FIXME)
486
    my $d1 = output_pref({ dt => dt_from_string->add(days => -2), dateformat => 'sql' });
486
    my $d1 = output_pref({ dt => dt_from_string->add(days => -2), dateformat => 'sql' });
487
    my $d2 = output_pref({ dt => dt_from_string->add(days => -4), dateformat => 'sql' });
487
    my $d2 = output_pref({ dt => dt_from_string->add(days => -4), dateformat => 'sql' });
488
    my $sugg01 = $builder->build({ source => 'Suggestion', value => { date => $d1, STATUS => 'ASKED' }});
488
    my $sugg01 = $builder->build({ source => 'Suggestion', value => { manageddate => $d1, date => $d2, STATUS => 'ASKED' }});
489
    my $sugg02 = $builder->build({ source => 'Suggestion', value => { date => $d1, STATUS => 'CHECKED' }});
489
    my $sugg02 = $builder->build({ source => 'Suggestion', value => { manageddate => $d1, date => $d2, STATUS => 'CHECKED' }});
490
    my $sugg03 = $builder->build({ source => 'Suggestion', value => { date => $d2, STATUS => 'ASKED' }});
490
    my $sugg03 = $builder->build({ source => 'Suggestion', value => { manageddate => $d2, date => $d2, STATUS => 'ASKED' }});
491
    my $sugg04 = $builder->build({ source => 'Suggestion', value => { date => $d2, STATUS => 'ACCEPTED' }});
491
    my $sugg04 = $builder->build({ source => 'Suggestion', value => { manageddate => $d2, date => $d2, STATUS => 'ACCEPTED' }});
492
492
493
    # Test no parameter: should do nothing
493
    # Test no parameter: should do nothing
494
    C4::Suggestions::DelSuggestionsOlderThan();
494
    C4::Suggestions::DelSuggestionsOlderThan();
495
- 

Return to bug 28855