diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2002-08-19 20:15:14 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2002-08-19 20:15:14 +0000 |
commit | f336f32b526e7d74d7b7c0fd51ee95a165dd2f85 (patch) | |
tree | fa636fdc7114de8d7403b4beb5206a121924b9cf /perl-install/Xconfig/main.pm | |
parent | 2e51473df52bc4eb55d8e4058c9b8f833f59fec0 (diff) | |
download | drakx-backup-do-not-use-f336f32b526e7d74d7b7c0fd51ee95a165dd2f85.tar drakx-backup-do-not-use-f336f32b526e7d74d7b7c0fd51ee95a165dd2f85.tar.gz drakx-backup-do-not-use-f336f32b526e7d74d7b7c0fd51ee95a165dd2f85.tar.bz2 drakx-backup-do-not-use-f336f32b526e7d74d7b7c0fd51ee95a165dd2f85.tar.xz drakx-backup-do-not-use-f336f32b526e7d74d7b7c0fd51ee95a165dd2f85.zip |
replace "xxx => eval { }" with "xxx => scalar eval {}"
Diffstat (limited to 'perl-install/Xconfig/main.pm')
-rw-r--r-- | perl-install/Xconfig/main.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/Xconfig/main.pm b/perl-install/Xconfig/main.pm index e247b001f..27f8fd76b 100644 --- a/perl-install/Xconfig/main.pm +++ b/perl-install/Xconfig/main.pm @@ -127,9 +127,9 @@ sub configure_chooser { my ($in, $raw_X, $do_pkgs, $options) = @_; my $X = { - card => eval { Xconfig::card::from_raw_X($raw_X) }, + card => scalar eval { Xconfig::card::from_raw_X($raw_X) }, monitor => $raw_X->get_monitors && Xconfig::monitor::from_raw_X($raw_X), - resolution => eval { $raw_X->get_resolution }, + resolution => scalar eval { $raw_X->get_resolution }, }; my ($ok, $modified) = configure_chooser_raw($in, $raw_X, $do_pkgs, $options, $X); |