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

(-)a/t/db_dependent/Accounts.t (-3 / +7 lines)
Lines 18-24 Link Here
18
18
19
use Modern::Perl;
19
use Modern::Perl;
20
20
21
use Test::More tests => 36;
21
use Test::More tests => 37;
22
use Test::MockModule;
22
use Test::MockModule;
23
use Test::Warn;
23
use Test::Warn;
24
24
Lines 91-97 $dbh->do(q|DELETE FROM accountlines|); Link Here
91
# Test manualinvoice, reuse some of the vars from testing chargelostitem
91
# Test manualinvoice, reuse some of the vars from testing chargelostitem
92
my $type = 'L';
92
my $type = 'L';
93
my $note = 'Test note!';
93
my $note = 'Test note!';
94
manualinvoice( $patron->{borrowernumber}, $item->{itemnumber}, $description, $type, $amount, $note );
94
warning_like {
95
    C4::Accounts::manualinvoice( $patron->{borrowernumber},
96
        $item->{itemnumber}, $description, $type, $amount, $note )
97
}
98
qr/C4::Accounts::manualinvoice is deprecated in favor of Koha::Account->add_debit/,
99
  "deprecation warning recieved for manualinvoice";
95
($accountline) = Koha::Account::Lines->search(
100
($accountline) = Koha::Account::Lines->search(
96
    {
101
    {
97
        borrowernumber => $patron->{borrowernumber}
102
        borrowernumber => $patron->{borrowernumber}
98
- 

Return to bug 21756