summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2002-02-17 16:50:06 +0000
committerPascal Rigaux <pixel@mandriva.com>2002-02-17 16:50:06 +0000
commit90c65f880af471323bbede9ab518f86d79687e1f (patch)
tree9b84489a5711372d686b69135d721add85a88a51
parent48b488c8d4b23c096c010c0cda37028b9ddc4b1b (diff)
downloaddrakx-90c65f880af471323bbede9ab518f86d79687e1f.tar
drakx-90c65f880af471323bbede9ab518f86d79687e1f.tar.gz
drakx-90c65f880af471323bbede9ab518f86d79687e1f.tar.bz2
drakx-90c65f880af471323bbede9ab518f86d79687e1f.tar.xz
drakx-90c65f880af471323bbede9ab518f86d79687e1f.zip
force scalar context for warp_text
-rw-r--r--perl-install/diskdrake/interactive.pm2
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 },