first round of Perl::Critic cleanups. Do not use return undef, use a bare return instead
This commit is contained in:
parent
75041656ee
commit
96178fd70c
92 changed files with 209 additions and 209 deletions
|
|
@ -110,7 +110,7 @@ sub param {
|
|||
@data = $self->session->request->param($field);
|
||||
return wantarray ? @data : $data[0];
|
||||
} else {
|
||||
return undef;
|
||||
return;
|
||||
}
|
||||
} else {
|
||||
if ($self->session->request) {
|
||||
|
|
@ -123,7 +123,7 @@ sub param {
|
|||
}
|
||||
return keys %params;
|
||||
} else {
|
||||
return undef;
|
||||
return;
|
||||
}
|
||||
}
|
||||
}
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue