Bug 28575: (QA follow-up) Tidy and test count
Signed-off-by: Nick Clemens <nick@bywatersolutions.com> Signed-off-by: Katrin Fischer <katrin.fischer@bsz-bw.de>
This commit is contained in:
parent
f2e88d4cbc
commit
230e1e3e7a
|
|
@ -2313,13 +2313,13 @@ sub AddReturn {
|
|||
my @object_messages = @{ $updated_item->object_messages };
|
||||
for my $message (@object_messages) {
|
||||
$messages->{'LostItemFeeRefunded'} = 1
|
||||
if $message->message eq 'lost_refunded';
|
||||
if $message->message eq 'lost_refunded';
|
||||
$messages->{'ProcessingFeeRefunded'} = 1
|
||||
if $message->message eq 'processing_refunded';
|
||||
if $message->message eq 'processing_refunded';
|
||||
$messages->{'LostItemFeeRestored'} = 1
|
||||
if $message->message eq 'lost_restored';
|
||||
if $message->message eq 'lost_restored';
|
||||
$messages->{'LostItemPaymentNotRefunded'} = 1
|
||||
if $message->message eq 'payment_not_refunded';
|
||||
if $message->message eq 'payment_not_refunded';
|
||||
|
||||
if ( $message->message eq 'lost_charge' ) {
|
||||
$issue //= Koha::Old::Checkouts->search(
|
||||
|
|
|
|||
|
|
@ -703,10 +703,7 @@ foreach my $code ( keys %$messages ) {
|
|||
elsif ( $code eq 'LostItemFeeRefunded' ) {
|
||||
$template->param( LostItemFeeRefunded => 1 );
|
||||
}
|
||||
elsif (
|
||||
$code eq 'LostItemPaymentNotRefunded'
|
||||
)
|
||||
{
|
||||
elsif ( $code eq 'LostItemPaymentNotRefunded' ) {
|
||||
$template->param( LostItemPaymentNotRefunded => 1 );
|
||||
}
|
||||
elsif ( $code eq 'LostItemFeeCharged' ) {
|
||||
|
|
|
|||
|
|
@ -18,7 +18,7 @@
|
|||
use Modern::Perl;
|
||||
use utf8;
|
||||
|
||||
use Test::More tests => 75;
|
||||
use Test::More tests => 76;
|
||||
use Test::Exception;
|
||||
use Test::MockModule;
|
||||
use Test::Deep qw( cmp_deeply );
|
||||
|
|
@ -6882,8 +6882,8 @@ subtest 'NoRefundOnLostFinesPaidAge' => sub {
|
|||
date => '1970-01-01 14:00:01',
|
||||
amountoutstanding => 0,
|
||||
amount => -5,
|
||||
interface => 'commandline',
|
||||
credit_type_code => 'PAYMENT'
|
||||
interface => 'commandline',
|
||||
credit_type_code => 'PAYMENT'
|
||||
}
|
||||
)->store();
|
||||
my $offset = Koha::Account::Offset->new(
|
||||
|
|
|
|||
Loading…
Reference in New Issue