With some versions of Perl this generates a warning which causes
ms-flights-summary to fail.
Signed-off-by: Ian Jackson <ian.jack...@eu.citrix.com>
CC: Wei Liu <wei.l...@citrix.com>
---
ms-flights-summary | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
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;
--
2.1.4
_______________________________________________
Xen-devel mailing list
Xen-devel@lists.xen.org
https://lists.xen.org/xen-devel
