diff options
author | Thierry Vignaud <tv@mageia.org> | 2012-01-31 17:51:29 +0000 |
---|---|---|
committer | Thierry Vignaud <tv@mageia.org> | 2012-01-31 17:51:29 +0000 |
commit | 2593ef3771878f36d8b930d175595d13c008f850 (patch) | |
tree | 9b34c9b2fa2ca59c43492970fedd62925c8d70f0 /perl-install/detect_devices.pm | |
parent | df8fa7b18d09201309a31a24e983f80fffce37fb (diff) | |
download | drakx-2593ef3771878f36d8b930d175595d13c008f850.tar drakx-2593ef3771878f36d8b930d175595d13c008f850.tar.gz drakx-2593ef3771878f36d8b930d175595d13c008f850.tar.bz2 drakx-2593ef3771878f36d8b930d175595d13c008f850.tar.xz drakx-2593ef3771878f36d8b930d175595d13c008f850.zip |
(dmidecode) fix crashing on parsing garbaged DMI info (mga#4329)
Diffstat (limited to 'perl-install/detect_devices.pm')
-rw-r--r-- | perl-install/detect_devices.pm | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/perl-install/detect_devices.pm b/perl-install/detect_devices.pm index 3c2fe0065..8cc4935d3 100644 --- a/perl-install/detect_devices.pm +++ b/perl-install/detect_devices.pm @@ -1081,6 +1081,7 @@ sub dmidecode() { } foreach (@l) { + next if /TRUNCATED/; if (/^$tab\t(.*)/) { $dmis[-1]{string} .= "$1\n"; $dmis[-1]{$1} = $2 if /^$tab\t(.*): (.*)$/; |