Message ID | 1467819074-16310-3-git-send-email-ian.jackson@eu.citrix.com (mailing list archive) |
---|---|
State | New, archived |
Headers | show |
diff --git a/ms-flights-summary b/ms-flights-summary index ea72088..c703d81 100755 --- a/ms-flights-summary +++ b/ms-flights-summary @@ -359,7 +359,7 @@ printf("<p>%d flight(s) consisting of %s job(s)<br />%s<br />%s anonymous/rogue my %summarycounts; foreach my $fi (values %flights) { - $summarycounts{$_} += $fi->{Stats}{$_} foreach (keys \%{ $fi->{Stats} }); + $summarycounts{$_} += $fi->{Stats}{$_} foreach (keys %{ $fi->{Stats} }); } my @summarycounts = sort_stats \%summarycounts;
With some versions of Perl this generates a warning which causes ms-flights-summary to fail. Signed-off-by: Ian Jackson <Ian.Jackson@eu.citrix.com> CC: Wei Liu <wei.liu2@citrix.com> --- ms-flights-summary | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-)