Bug 18759: Try to fix random failure from Circulation.t

Circulation.t is failing randomly on our CI
https://jenkins.koha-community.org/job/Koha_Master_D8/192/console

    #   Failed test at t/db_dependent/Circulation.t line 1147.
    #          got: '1'
    #     expected: '0'

    #   Failed test at t/db_dependent/Circulation.t line 1152.
    #          got: '1'
    #     expected: '0'

    #   Failed test at t/db_dependent/Circulation.t line 1156.
    #          got: '1'
    #     expected: '0'

    #   Failed test at t/db_dependent/Circulation.t line 1170.
    #          got: '1'
    #     expected: '0'

    #   Failed test at t/db_dependent/Circulation.t line 1184.
    #          got: '1'
    #     expected: '0'
    # Looks like you failed 5 tests of 23.

Sometimes one of the alert or impossible flags is set.
This patch guesses that it's because of the 'restricted' value of the item that is evaluated to 1.
If it is not fixed by this patch, we will have more info next time (at least know
if alert or impossible is set).

Signed-off-by: Tomas Cohen Arazi <tomascohen@theke.io>
The fix is trivial. Using random data will lead to this situations. The good thing is that
it lets us spot places in which tests need more fine-grained data.
Signed-off-by: Mason James <mtj@kohaaloha.com>
This commit is contained in:
Jonathan Druart 2017-06-08 11:54:18 -03:00 committed by Mason James
parent a84990a211
commit e2f92cd5e0
1 changed files with 8 additions and 4 deletions

View File

@ -948,7 +948,7 @@ C4::Context->dbh->do("DELETE FROM accountlines");
}
subtest 'CanBookBeIssued & AllowReturnToBranch' => sub {
plan tests => 23;
plan tests => 26;
my $homebranch = $builder->build( { source => 'Branch' } );
my $holdingbranch = $builder->build( { source => 'Branch' } );
@ -982,16 +982,19 @@ subtest 'CanBookBeIssued & AllowReturnToBranch' => sub {
## Can be issued from homebranch
set_userenv($homebranch);
( $error, $question, $alerts ) = CanBookBeIssued( $patron_2, $item->{barcode} );
is( keys(%$error) + keys(%$alerts), 0 );
is( keys(%$error), 0, 'There should not be any errors (impossible)' );
is( keys(%$alerts), 0, 'There should not be any alerts' );
is( exists $question->{ISSUED_TO_ANOTHER}, 1 );
## Can be issued from holdingbranch
set_userenv($holdingbranch);
( $error, $question, $alerts ) = CanBookBeIssued( $patron_2, $item->{barcode} );
is( keys(%$error) + keys(%$alerts), 0 );
is( keys(%$error), 0, 'There should not be any errors (impossible)' );
is( keys(%$alerts), 0, 'There should not be any alerts' );
is( exists $question->{ISSUED_TO_ANOTHER}, 1 );
## Can be issued from another branch
( $error, $question, $alerts ) = CanBookBeIssued( $patron_2, $item->{barcode} );
is( keys(%$error) + keys(%$alerts), 0 );
is( keys(%$error), 0, 'There should not be any errors (impossible)' );
is( keys(%$alerts), 0, 'There should not be any alerts' );
is( exists $question->{ISSUED_TO_ANOTHER}, 1 );
# AllowReturnToBranch == holdingbranch
@ -1055,6 +1058,7 @@ subtest 'AddIssue & AllowReturnToBranch' => sub {
notforloan => 0,
itemlost => 0,
withdrawn => 0,
restricted => 0,
biblionumber => $biblioitem->{biblionumber}
}
}