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

(-)a/t/db_dependent/Reports/Guided.t (-2 / +4 lines)
Lines 24-29 use Test::Warn; Link Here
24
use t::lib::TestBuilder;
24
use t::lib::TestBuilder;
25
use C4::Context;
25
use C4::Context;
26
use Koha::Database;
26
use Koha::Database;
27
use Koha::DateUtils qw( dt_from_string );
27
use Koha::Items;
28
use Koha::Items;
28
use Koha::Reports;
29
use Koha::Reports;
29
use Koha::Notice::Messages;
30
use Koha::Notice::Messages;
Lines 185-191 subtest 'GetParametersFromSQL+ValidateSQLParameters' => sub { Link Here
185
};
186
};
186
187
187
subtest 'get_saved_reports' => sub {
188
subtest 'get_saved_reports' => sub {
188
    plan tests => 17;
189
    plan tests => 18;
189
    my $dbh = C4::Context->dbh;
190
    my $dbh = C4::Context->dbh;
190
    $dbh->do(q|DELETE FROM saved_sql|);
191
    $dbh->do(q|DELETE FROM saved_sql|);
191
    $dbh->do(q|DELETE FROM saved_reports|);
192
    $dbh->do(q|DELETE FROM saved_reports|);
Lines 220-225 subtest 'get_saved_reports' => sub { Link Here
220
221
221
    ok( 0 < scalar @{ get_saved_reports( $report_ids[0] ) }, "filter takes report id" );
222
    ok( 0 < scalar @{ get_saved_reports( $report_ids[0] ) }, "filter takes report id" );
222
223
224
    ok( 0 < scalar @{ get_saved_reports({date => dt_from_string->ymd }) }, "filter takes date" );
225
223
    my $r1 = Koha::Reports->find($report_ids[0]);
226
    my $r1 = Koha::Reports->find($report_ids[0]);
224
    $r1 = update_sql($r1->id, { %{$r1->unblessed}, borrowernumber => $r1->borrowernumber, name => 'Just another report' });
227
    $r1 = update_sql($r1->id, { %{$r1->unblessed}, borrowernumber => $r1->borrowernumber, name => 'Just another report' });
225
    is( $r1->cache_expiry, 300, 'cache_expiry has the correct default value, from DBMS' );
228
    is( $r1->cache_expiry, 300, 'cache_expiry has the correct default value, from DBMS' );
226
- 

Return to bug 30129