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 => 33;
21
use Test::More tests => 34;
22
use Test::MockModule;
22
use Test::MockModule;
23
use Test::Warn;
23
use Test::Warn;
24
24
Lines 79-85 my $amount = '5.000000'; Link Here
79
my $description = "Test fee!";
79
my $description = "Test fee!";
80
my $type = 'L';
80
my $type = 'L';
81
my $note = 'Test note!';
81
my $note = 'Test note!';
82
manualinvoice( $patron->{borrowernumber}, $item->{itemnumber}, $description, $type, $amount, $note );
82
warning_like {
83
    C4::Accounts::manualinvoice( $patron->{borrowernumber},
84
        $item->{itemnumber}, $description, $type, $amount, $note )
85
}
86
qr/C4::Accounts::manualinvoice is deprecated in favor of Koha::Account->add_debit/,
87
  "deprecation warning recieved for manualinvoice";
83
my ($accountline) = Koha::Account::Lines->search(
88
my ($accountline) = Koha::Account::Lines->search(
84
    {
89
    {
85
        borrowernumber => $patron->{borrowernumber}
90
        borrowernumber => $patron->{borrowernumber}
86
- 

Return to bug 21756