We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
1 parent 1647d0a commit 480bfe1Copy full SHA for 480bfe1
lib/MetaCPAN/Web/Controller/Release.pm
@@ -66,8 +66,8 @@ sub view : Private {
66
## Remove author from contributors list
67
my $author_name = $data->{author}->{name};
68
my $contributors = [];
69
- foreach my $contributor (@{$data->{contributors}}) {
70
- if ($contributor->{name} !~ /\b$author_name\b/) {
+ foreach my $contributor ( @{ $data->{contributors} } ) {
+ if ( $contributor->{name} !~ /\b$author_name\b/ ) {
71
push @$contributors, $contributor;
72
}
73
0 commit comments