diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2002-02-17 16:50:06 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2002-02-17 16:50:06 +0000 |
commit | 90c65f880af471323bbede9ab518f86d79687e1f (patch) | |
tree | 9b84489a5711372d686b69135d721add85a88a51 /perl-install/diskdrake/interactive.pm | |
parent | 48b488c8d4b23c096c010c0cda37028b9ddc4b1b (diff) | |
download | drakx-90c65f880af471323bbede9ab518f86d79687e1f.tar drakx-90c65f880af471323bbede9ab518f86d79687e1f.tar.gz drakx-90c65f880af471323bbede9ab518f86d79687e1f.tar.bz2 drakx-90c65f880af471323bbede9ab518f86d79687e1f.tar.xz drakx-90c65f880af471323bbede9ab518f86d79687e1f.zip |
force scalar context for warp_text
Diffstat (limited to 'perl-install/diskdrake/interactive.pm')
-rw-r--r-- | perl-install/diskdrake/interactive.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/diskdrake/interactive.pm b/perl-install/diskdrake/interactive.pm index daf750b60..1fd8924ee 100644 --- a/perl-install/diskdrake/interactive.pm +++ b/perl-install/diskdrake/interactive.pm @@ -802,7 +802,7 @@ sub Options { '', [ (map {; - { label => $_, text => warp_text(formatAlaTeX($help{$_})), val => \$options->{$_}, + { label => $_, text => scalar warp_text(formatAlaTeX($help{$_})), val => \$options->{$_}, advanced => !$part->{rootDevice} && !member($_, @simple_options), if_(!/=$/, type => 'bool'), } } keys %$options), { label => _("Various"), val => \$unknown, advanced => 1 }, |