summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2002-11-04 18:52:47 +0000
committerPascal Rigaux <pixel@mandriva.com>2002-11-04 18:52:47 +0000
commit7c6d4b3c60d8ac02d3d1bd3f06f034002267ba8a (patch)
tree7a95498bdea029c559ceace58f09e30719d4daab
parentead06eb55004bc197f37c4f4a68230b40186a291 (diff)
downloaddrakx-7c6d4b3c60d8ac02d3d1bd3f06f034002267ba8a.tar
drakx-7c6d4b3c60d8ac02d3d1bd3f06f034002267ba8a.tar.gz
drakx-7c6d4b3c60d8ac02d3d1bd3f06f034002267ba8a.tar.bz2
drakx-7c6d4b3c60d8ac02d3d1bd3f06f034002267ba8a.tar.xz
drakx-7c6d4b3c60d8ac02d3d1bd3f06f034002267ba8a.zip
have an empty configuration when a config file is buggy
-rw-r--r--perl-install/Xconfig/xfree.pm4
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/Xconfig/xfree.pm b/perl-install/Xconfig/xfree.pm
index 583229f4b..89b06a61f 100644
--- a/perl-install/Xconfig/xfree.pm
+++ b/perl-install/Xconfig/xfree.pm
@@ -13,8 +13,8 @@ use log;
#- files are optional
sub read {
my ($class, $xfree3_file, $xfree4_file) = @_;
- bless { xfree3 => Xconfig::xfree3->read($xfree3_file),
- xfree4 => Xconfig::xfree4->read($xfree4_file) }, $class;
+ bless { xfree3 => eval { Xconfig::xfree3->read($xfree3_file) } || [],
+ xfree4 => eval { Xconfig::xfree4->read($xfree4_file) } || [] }, $class;
}
#- files are optional
sub write {