diff options
| author | Thierry Vignaud <tv@mandriva.org> | 2009-04-20 15:30:12 +0000 |
|---|---|---|
| committer | Thierry Vignaud <tv@mandriva.org> | 2009-04-20 15:30:12 +0000 |
| commit | 0756f81db4bc8da0f5d5fd149d448a95e43535bf (patch) | |
| tree | 43c6fb7b8beab65d051cdaf2646c978edcfbd0ae /perl-install/any.pm | |
| parent | 8f94b7e16e1d446c849e268dcf42bb1c93fa8c32 (diff) | |
| download | drakx-0756f81db4bc8da0f5d5fd149d448a95e43535bf.tar drakx-0756f81db4bc8da0f5d5fd149d448a95e43535bf.tar.gz drakx-0756f81db4bc8da0f5d5fd149d448a95e43535bf.tar.bz2 drakx-0756f81db4bc8da0f5d5fd149d448a95e43535bf.tar.xz drakx-0756f81db4bc8da0f5d5fd149d448a95e43535bf.zip | |
(_install_raw,monitor_full_edid) do not log perl warnings about
missing/not-yet-installed locales while installing and while probing EDID
Diffstat (limited to 'perl-install/any.pm')
| -rw-r--r-- | perl-install/any.pm | 10 |
1 files changed, 7 insertions, 3 deletions
diff --git a/perl-install/any.pm b/perl-install/any.pm index 634dbf9f4..472db55c7 100644 --- a/perl-install/any.pm +++ b/perl-install/any.pm @@ -1294,9 +1294,13 @@ sub monitor_full_edid() { devices::make('zero'); my ($vbe, $edid); - run_program::raw({ timeout => 20 }, - 'monitor-edid', '>', \$edid, '2>', \$vbe, - '-v', '--perl', if_($::isStandalone, '--try-in-console')); + { + # prevent warnings in install's logs: + local $ENV{LC_ALL} = 'C'; + run_program::raw({ timeout => 20 }, + 'monitor-edid', '>', \$edid, '2>', \$vbe, + '-v', '--perl', if_($::isStandalone, '--try-in-console')); + } if ($::isInstall) { foreach (['edid', \$edid], ['vbe', \$vbe]) { my ($name, $val) = @$_; |