diff options
| author | Pascal Rigaux <pixel@mandriva.com> | 2005-08-03 09:07:11 +0000 |
|---|---|---|
| committer | Pascal Rigaux <pixel@mandriva.com> | 2005-08-03 09:07:11 +0000 |
| commit | 1edb10ed44c801a1f1a20404d842f288e5a29380 (patch) | |
| tree | 83208c8251f4cfb25f02cdd2a485431874df2a78 /test/check_dmidecode.pl | |
| parent | 0825a6779a933697e87dc5cde0e463a1ead901bf (diff) | |
| download | ldetect-lst-1edb10ed44c801a1f1a20404d842f288e5a29380.tar ldetect-lst-1edb10ed44c801a1f1a20404d842f288e5a29380.tar.gz ldetect-lst-1edb10ed44c801a1f1a20404d842f288e5a29380.tar.bz2 ldetect-lst-1edb10ed44c801a1f1a20404d842f288e5a29380.tar.xz ldetect-lst-1edb10ed44c801a1f1a20404d842f288e5a29380.zip | |
add and cleanup
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 ]); |