Add explicit returns

This commit is contained in:
Rumperuu 2021-03-20 15:02:00 +00:00
parent ee7fe2c7b4
commit c5c074903d
44 changed files with 191 additions and 11 deletions

View file

@ -24,6 +24,8 @@ sub import_csv {
while ( my $row = $self->get_csv_line ) {
$self->_row_to_result($row);
}
return 1;
}
sub _row_to_result {
@ -45,6 +47,8 @@ sub _row_to_result {
return if $postcode_r->ward;
$postcode_r->update( { ward_id => $ward->id } );
return 1;
}
1;

View file

@ -22,6 +22,8 @@ sub import_csv {
while ( my $row = $self->get_csv_line ) {
$self->_row_to_result($row);
}
return 1;
}
sub _row_to_result {
@ -56,6 +58,8 @@ sub _row_to_result {
}
}
);
return 1;
}
1;

View file

@ -46,6 +46,8 @@ sub import_csv {
while ( my $row = $self->get_csv_line ) {
$self->_row_to_result( $row, $lcc_org );
}
return 1;
}
sub _row_to_result {
@ -181,6 +183,8 @@ sub _row_to_result {
),
}
);
return 1;
}
1;