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

(-)a/t/db_dependent/Koha/Patrons.t (-4 / +4 lines)
Lines 182-190 subtest 'add_enrolment_fee_if_needed' => sub { Link Here
182
    my $enrolmentfee_J  = 10;
182
    my $enrolmentfee_J  = 10;
183
    my $enrolmentfee_YA = 20;
183
    my $enrolmentfee_YA = 20;
184
184
185
    $builder->build( { source => 'Category', value => { categorycode => 'K',  enrolmentfee => $enrolmentfee_K } } );
185
    my $dbh = C4::Context->dbh;
186
    $builder->build( { source => 'Category', value => { categorycode => 'J',  enrolmentfee => $enrolmentfee_J } } );
186
    $dbh->do(q|UPDATE categories set enrolmentfee=? where categorycode=?|, undef, $enrolmentfee_K, 'K');
187
    $builder->build( { source => 'Category', value => { categorycode => 'YA', enrolmentfee => $enrolmentfee_YA } } );
187
    $dbh->do(q|UPDATE categories set enrolmentfee=? where categorycode=?|, undef, $enrolmentfee_J, 'J');
188
    $dbh->do(q|UPDATE categories set enrolmentfee=? where categorycode=?|, undef, $enrolmentfee_YA, 'YA');
188
189
189
    my %borrower_data = (
190
    my %borrower_data = (
190
        firstname    => 'my firstname',
191
        firstname    => 'my firstname',
191
- 

Return to bug 16912