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

(-)a/t/db_dependent/Circulation.t (-1 / +1 lines)
Lines 63-69 my $itemtype = $builder->build( Link Here
63
        value  => { notforloan => undef, rentalcharge => 0, defaultreplacecost => undef, processfee => undef }
63
        value  => { notforloan => undef, rentalcharge => 0, defaultreplacecost => undef, processfee => undef }
64
    }
64
    }
65
)->{itemtype};
65
)->{itemtype};
66
my $patron_category = $builder->build({ source => 'Category', value => { categorycode => 'NOT_X', category_type => 'P', enrolmentfee => 0 } });
66
my $patron_category = $builder->build({ source => 'Category', value => { category_type => 'NOT_X', category_type => 'P', enrolmentfee => 0 } });
67
67
68
my $CircControl = C4::Context->preference('CircControl');
68
my $CircControl = C4::Context->preference('CircControl');
69
my $HomeOrHoldingBranch = C4::Context->preference('HomeOrHoldingBranch');
69
my $HomeOrHoldingBranch = C4::Context->preference('HomeOrHoldingBranch');
(-)a/t/db_dependent/Circulation/MarkIssueReturned.t (-1 / +1 lines)
Lines 39-45 my $library = $builder->build({ source => 'Branch' }); Link Here
39
C4::Context->_new_userenv('xxx');
39
C4::Context->_new_userenv('xxx');
40
C4::Context->set_userenv(0,0,0,'firstname','surname', $library->{branchcode}, $library->{branchname}, '', '', '');
40
C4::Context->set_userenv(0,0,0,'firstname','surname', $library->{branchcode}, $library->{branchname}, '', '', '');
41
41
42
my $patron_category = $builder->build({ source => 'Category', value => { categorycode => 'NOT_X', category_type => 'P', enrolmentfee => 0 } });
42
my $patron_category = $builder->build({ source => 'Category', value => { category_type => 'NOT_X', category_type => 'P', enrolmentfee => 0 } });
43
my $patron = $builder->build({ source => 'Borrower', value => { branchcode => $library->{branchcode}, categorycode => $patron_category->{categorycode} } } );
43
my $patron = $builder->build({ source => 'Borrower', value => { branchcode => $library->{branchcode}, categorycode => $patron_category->{categorycode} } } );
44
44
45
my $biblioitem = $builder->build( { source => 'Biblioitem' } );
45
my $biblioitem = $builder->build( { source => 'Biblioitem' } );
(-)a/t/db_dependent/Circulation/NoIssuesChargeGuarantees.t (-1 / +1 lines)
Lines 42-48 my $item = $builder->build( Link Here
42
    }
42
    }
43
);
43
);
44
44
45
my $patron_category = $builder->build({ source => 'Category', value => { categorycode => 'NOT_X', category_type => 'P', enrolmentfee => 0 } });
45
my $patron_category = $builder->build({ source => 'Category', value => { category_type => 'NOT_X', category_type => 'P', enrolmentfee => 0 } });
46
my $patron = $builder->build(
46
my $patron = $builder->build(
47
    {
47
    {
48
        source => 'Borrower',
48
        source => 'Borrower',
(-)a/t/db_dependent/Circulation/SwitchOnSiteCheckouts.t (-1 / +1 lines)
Lines 50-56 my $branch = $builder->build({ Link Here
50
    source => 'Branch',
50
    source => 'Branch',
51
});
51
});
52
52
53
my $patron_category = $builder->build({ source => 'Category', value => { categorycode => 'NOT_X', category_type => 'P', enrolmentfee => 0 } });
53
my $patron_category = $builder->build({ source => 'Category', value => { category_type => 'NOT_X', category_type => 'P', enrolmentfee => 0 } });
54
my $patron = $builder->build({
54
my $patron = $builder->build({
55
    source => 'Borrower',
55
    source => 'Borrower',
56
    value => {
56
    value => {
(-)a/t/db_dependent/Circulation/dateexpiry.t (-1 / +1 lines)
Lines 34-40 my $builder = t::lib::TestBuilder->new(); Link Here
34
34
35
$ENV{ DEBUG } = 0;
35
$ENV{ DEBUG } = 0;
36
36
37
my $patron_category = $builder->build({ source => 'Category', value => { categorycode => 'NOT_X', category_type => 'P', enrolmentfee => 0 } });
37
my $patron_category = $builder->build({ source => 'Category', value => { category_type => 'NOT_X', category_type => 'P', enrolmentfee => 0 } });
38
38
39
subtest 'Tests for CanBookBeIssued related to dateexpiry' => sub {
39
subtest 'Tests for CanBookBeIssued related to dateexpiry' => sub {
40
    plan tests => 4;
40
    plan tests => 4;
(-)a/t/db_dependent/DecreaseLoanHighHolds.t (-2 / +1 lines)
Lines 51-57 C4::Context->_new_userenv('xxx'); Link Here
51
C4::Context->set_userenv( 0, 0, 0, 'firstname', 'surname', $library->{branchcode}, 'Midway Public Library', '', '', '' );
51
C4::Context->set_userenv( 0, 0, 0, 'firstname', 'surname', $library->{branchcode}, 'Midway Public Library', '', '', '' );
52
is( C4::Context->userenv->{branch}, $library->{branchcode}, 'userenv set' );
52
is( C4::Context->userenv->{branch}, $library->{branchcode}, 'userenv set' );
53
53
54
my $patron_category = $builder->build({ source => 'Category', value => { categorycode => 'NOT_X', category_type => 'P', enrolmentfee => 0 } });
54
my $patron_category = $builder->build({ source => 'Category', value => { category_type => 'NOT_X', category_type => 'P', enrolmentfee => 0 } });
55
my @patrons;
55
my @patrons;
56
for my $i ( 1 .. 20 ) {
56
for my $i ( 1 .. 20 ) {
57
    my $patron = Koha::Patron->new(
57
    my $patron = Koha::Patron->new(
58
- 

Return to bug 19776