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

(-)a/t/db_dependent/Circulation.t (-1 / +9 lines)
Lines 277-283 $dbh->do( Link Here
277
277
278
my ( $reused_itemnumber_1, $reused_itemnumber_2 );
278
my ( $reused_itemnumber_1, $reused_itemnumber_2 );
279
subtest "CanBookBeRenewed tests" => sub {
279
subtest "CanBookBeRenewed tests" => sub {
280
    plan tests => 71;
280
    plan tests => 73;
281
281
282
    C4::Context->set_preference('ItemsDeniedRenewal','');
282
    C4::Context->set_preference('ItemsDeniedRenewal','');
283
    # Generate test biblio
283
    # Generate test biblio
Lines 916-921 subtest "CanBookBeRenewed tests" => sub { Link Here
916
    is( $renewokay, 0, 'Cannot renew, 0 renewals allowed');
916
    is( $renewokay, 0, 'Cannot renew, 0 renewals allowed');
917
    is( $error, 'too_many', 'Cannot renew, 0 renewals allowed (returned code is too_many)');
917
    is( $error, 'too_many', 'Cannot renew, 0 renewals allowed (returned code is too_many)');
918
918
919
    # Too many unseen renewals
920
    $dbh->do('UPDATE issuingrules SET unseen_renewals_allowed = 2, renewalsallowed = 10');
921
    $dbh->do('UPDATE issues SET unseen_renewals = 2 where borrowernumber = ? AND itemnumber = ?', undef, ($renewing_borrowernumber, $item_1->itemnumber));
922
    ( $renewokay, $error ) = CanBookBeRenewed($renewing_borrowernumber, $item_1->itemnumber);
923
    is( $renewokay, 0, 'Cannot renew, 0 unseen renewals allowed');
924
    is( $error, 'too_unseen', 'Cannot renew, returned code is too_unseen');
925
    $dbh->do('UPDATE issuingrules SET norenewalbefore = NULL, renewalsallowed = 0');
926
919
    # Test WhenLostForgiveFine and WhenLostChargeReplacementFee
927
    # Test WhenLostForgiveFine and WhenLostChargeReplacementFee
920
    t::lib::Mocks::mock_preference('WhenLostForgiveFine','1');
928
    t::lib::Mocks::mock_preference('WhenLostForgiveFine','1');
921
    t::lib::Mocks::mock_preference('WhenLostChargeReplacementFee','1');
929
    t::lib::Mocks::mock_preference('WhenLostChargeReplacementFee','1');
(-)a/t/db_dependent/Circulation/issue.t (-1 / +13 lines)
Lines 32-37 use Koha::Checkouts; Link Here
32
use Koha::Database;
32
use Koha::Database;
33
use Koha::DateUtils;
33
use Koha::DateUtils;
34
use Koha::Holds;
34
use Koha::Holds;
35
use Koha::IssuingRules;
35
use Koha::Items;
36
use Koha::Items;
36
use Koha::Library;
37
use Koha::Library;
37
use Koha::Patrons;
38
use Koha::Patrons;
Lines 261-267 my $datedue4 = AddRenewal( $opac_renew_issue->{borrowernumber}, $opac_renew_issu Link Here
261
$stat = $dbh->selectrow_hashref("SELECT * FROM statistics WHERE type = 'renew' AND borrowernumber = ? AND itemnumber = ? AND branch = ?", undef,  $opac_renew_issue->{borrowernumber},  $opac_renew_issue->{itemnumber}, "Stavromula" );
262
$stat = $dbh->selectrow_hashref("SELECT * FROM statistics WHERE type = 'renew' AND borrowernumber = ? AND itemnumber = ? AND branch = ?", undef,  $opac_renew_issue->{borrowernumber},  $opac_renew_issue->{itemnumber}, "Stavromula" );
262
ok( $stat, "Bug 18572 - 'Bug 18572 - OpacRenewalBranch is now respected" );
263
ok( $stat, "Bug 18572 - 'Bug 18572 - OpacRenewalBranch is now respected" );
263
264
265
# Unseen rewnewals
266
t::lib::Mocks::mock_preference('UnseenRenewals', 1);
264
267
268
# Does an unseen renewal increment the issue's count
269
my ( $unseen_before ) = ( C4::Circulation::GetRenewCount( $opac_renew_issue->{borrowernumber}, $opac_renew_issue->{itemnumber} ) )[3];
270
AddRenewal( $opac_renew_issue->{borrowernumber}, $opac_renew_issue->{itemnumber}, $branchcode_1, undef, undef, 0 );
271
my ( $unseen_after ) = ( C4::Circulation::GetRenewCount( $opac_renew_issue->{borrowernumber}, $opac_renew_issue->{itemnumber} ) )[3];
272
is( $unseen_after, $unseen_before + 1, 'unseen_renewals increments' );
273
274
# Does a seen renewal reset the unseen count
275
AddRenewal( $opac_renew_issue->{borrowernumber}, $opac_renew_issue->{itemnumber}, $branchcode_1, undef, undef, 1 );
276
my ( $unseen_reset ) = ( C4::Circulation::GetRenewCount( $opac_renew_issue->{borrowernumber}, $opac_renew_issue->{itemnumber} ) )[3];
277
is( $unseen_reset, 0, 'seen renewal resets the unseen count' );
265
278
266
#Test GetBiblioIssues
279
#Test GetBiblioIssues
267
is( GetBiblioIssues(), undef, "GetBiblio Issues without parameters" );
280
is( GetBiblioIssues(), undef, "GetBiblio Issues without parameters" );
268
- 

Return to bug 24083