diff options
Diffstat (limited to 'bin/update-all-reports')
-rwxr-xr-x | bin/update-all-reports | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/bin/update-all-reports b/bin/update-all-reports index f6cd34210..0627cedc2 100755 --- a/bin/update-all-reports +++ b/bin/update-all-reports @@ -57,8 +57,7 @@ while ( my @problem = $problems->next ) { $problem{bodies} = 0; } else { # Add to bodies it was sent to - (my $bodies = $problem{bodies_str}) =~ s/\|.*$//; - @bodies = split( /,/, $bodies ); + @bodies = split( /,/, $problem{bodies_str} ); $problem{bodies} = scalar @bodies; } foreach my $body ( @bodies ) { |