diff options
Diffstat (limited to 'test/check_dmidecode.pl')
-rwxr-xr-x | test/check_dmidecode.pl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/test/check_dmidecode.pl b/test/check_dmidecode.pl index 53adb90d..d81cfbc9 100755 --- a/test/check_dmidecode.pl +++ b/test/check_dmidecode.pl @@ -17,7 +17,7 @@ foreach my $file (glob("dmidecode.*")) { my @surprise = difference2([ keys %got ], [ keys %wanted ]); if (@surprise) { - warn "for $file, surprise: ", join(' ', map { "$_ => $got{$_}" } @surprise), "\n"; + warn "for $file, surprise: ", join(' ', map { "(=> $_: $got{$_})" } @surprise), "\n"; } my @bad = grep { $wanted{$_} ne $got{$_} } intersection([ keys %wanted ], [ keys %got ]); |