Bug 43296: (follow-up) Fix perltidy
This follow-up fixes the formatting issue reported by xt/perltidy.t. Test plan: 1. Run prove xt/perltidy.t 2. Confirm it passes. Signed-off-by: Pedro Amorim <pedro.amorim@openfifth.co.uk>
This commit is contained in:
parent
18469d46c4
commit
0dfcddf383
|
|
@ -783,7 +783,7 @@ sub calculate {
|
||||||
|
|
||||||
sub report_field {
|
sub report_field {
|
||||||
my ( $value, $default, $allowed_fields, $allowed_attribute_codes ) = @_;
|
my ( $value, $default, $allowed_fields, $allowed_attribute_codes ) = @_;
|
||||||
return $value if defined $value && exists $allowed_fields->{$value};
|
return $value if defined $value && exists $allowed_fields->{$value};
|
||||||
return $default unless defined $value && index( $value, 'borrower_attributes.' ) == 0;
|
return $default unless defined $value && index( $value, 'borrower_attributes.' ) == 0;
|
||||||
|
|
||||||
my $code = substr( $value, length('borrower_attributes.') );
|
my $code = substr( $value, length('borrower_attributes.') );
|
||||||
|
|
|
||||||
Loading…
Reference in New Issue