@@ -, +, @@ randomly # Failed test 'Not blocked without overdues when set to 'Don't block'' # at t/db_dependent/SIP/Patron.t line 55. # got: '0' # expected: '1' # Failed test 'Not blocked without overdues when set to 'confirmation'' # at t/db_dependent/SIP/Patron.t line 61. # got: '0' # expected: '1' # Failed test 'Not blocked without overdues when set to 'Block'' # at t/db_dependent/SIP/Patron.t line 67. # got: '0' # expected: '1' --- t/db_dependent/SIP/Patron.t | 24 ++++++++++++++++++++++-- 1 file changed, 22 insertions(+), 2 deletions(-) --- a/t/db_dependent/SIP/Patron.t +++ a/t/db_dependent/SIP/Patron.t @@ -31,8 +31,28 @@ subtest "OverduesBlockCirc tests" => sub { plan tests => 6; - my $odue_patron = $builder->build({ source => 'Borrower' }); - my $good_patron = $builder->build({ source => 'Borrower' }); + my $odue_patron = $builder->build( + { + source => 'Borrower', + value => { + debarred => undef, + dateexpiry => "3000-01-01", + lost => 0, + gonenoaddress => 0, + } + } + ); + my $good_patron = $builder->build( + { + source => 'Borrower', + value => { + debarred => undef, + dateexpiry => "3000-01-01", + lost => 0, + gonenoaddress => 0, + } + } + ); my $odue = $builder->build({ source => 'Issue', value => { borrowernumber => $odue_patron->{borrowernumber}, date_due => '2017-01-01', --