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

(-)a/t/db_dependent/Circulation.t (-5 / +8 lines)
Lines 1110-1116 C4::Context->dbh->do("DELETE FROM accountlines"); Link Here
1110
}
1110
}
1111
1111
1112
subtest 'CanBookBeIssued & AllowReturnToBranch' => sub {
1112
subtest 'CanBookBeIssued & AllowReturnToBranch' => sub {
1113
    plan tests => 23;
1113
    plan tests => 26;
1114
1114
1115
    my $homebranch    = $builder->build( { source => 'Branch' } );
1115
    my $homebranch    = $builder->build( { source => 'Branch' } );
1116
    my $holdingbranch = $builder->build( { source => 'Branch' } );
1116
    my $holdingbranch = $builder->build( { source => 'Branch' } );
Lines 1127-1132 subtest 'CanBookBeIssued & AllowReturnToBranch' => sub { Link Here
1127
                notforloan    => 0,
1127
                notforloan    => 0,
1128
                itemlost      => 0,
1128
                itemlost      => 0,
1129
                withdrawn     => 0,
1129
                withdrawn     => 0,
1130
                restricted    => 0,
1130
                biblionumber  => $biblioitem->{biblionumber}
1131
                biblionumber  => $biblioitem->{biblionumber}
1131
            }
1132
            }
1132
        }
1133
        }
Lines 1144-1159 subtest 'CanBookBeIssued & AllowReturnToBranch' => sub { Link Here
1144
    ## Can be issued from homebranch
1145
    ## Can be issued from homebranch
1145
    set_userenv($homebranch);
1146
    set_userenv($homebranch);
1146
    ( $error, $question, $alerts ) = CanBookBeIssued( $patron_2, $item->{barcode} );
1147
    ( $error, $question, $alerts ) = CanBookBeIssued( $patron_2, $item->{barcode} );
1147
    is( keys(%$error) + keys(%$alerts),        0 );
1148
    is( keys(%$error), 0, 'There should not be any errors (impossible)' );
1149
    is( keys(%$alerts), 0, 'There should not be any alerts' );
1148
    is( exists $question->{ISSUED_TO_ANOTHER}, 1 );
1150
    is( exists $question->{ISSUED_TO_ANOTHER}, 1 );
1149
    ## Can be issued from holdingbranch
1151
    ## Can be issued from holdingbranch
1150
    set_userenv($holdingbranch);
1152
    set_userenv($holdingbranch);
1151
    ( $error, $question, $alerts ) = CanBookBeIssued( $patron_2, $item->{barcode} );
1153
    ( $error, $question, $alerts ) = CanBookBeIssued( $patron_2, $item->{barcode} );
1152
    is( keys(%$error) + keys(%$alerts),        0 );
1154
    is( keys(%$error), 0, 'There should not be any errors (impossible)' );
1155
    is( keys(%$alerts), 0, 'There should not be any alerts' );
1153
    is( exists $question->{ISSUED_TO_ANOTHER}, 1 );
1156
    is( exists $question->{ISSUED_TO_ANOTHER}, 1 );
1154
    ## Can be issued from another branch
1157
    ## Can be issued from another branch
1155
    ( $error, $question, $alerts ) = CanBookBeIssued( $patron_2, $item->{barcode} );
1158
    ( $error, $question, $alerts ) = CanBookBeIssued( $patron_2, $item->{barcode} );
1156
    is( keys(%$error) + keys(%$alerts),        0 );
1159
    is( keys(%$error), 0, 'There should not be any errors (impossible)' );
1160
    is( keys(%$alerts), 0, 'There should not be any alerts' );
1157
    is( exists $question->{ISSUED_TO_ANOTHER}, 1 );
1161
    is( exists $question->{ISSUED_TO_ANOTHER}, 1 );
1158
1162
1159
    # AllowReturnToBranch == holdingbranch
1163
    # AllowReturnToBranch == holdingbranch
1160
- 

Return to bug 18759