summaryrefslogtreecommitdiffstats
path: root/perl-install/common.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>1999-08-28 10:19:54 +0000
committerPascal Rigaux <pixel@mandriva.com>1999-08-28 10:19:54 +0000
commit2d3b13d3b7e6f08f6310467ece7d399c5858d233 (patch)
tree61e0a5cc6284c4e8dc138385da6329f2b8e83e0f /perl-install/common.pm
parent90f7bb2359c71498b66bf6eb4ed764671816ace6 (diff)
downloaddrakx-2d3b13d3b7e6f08f6310467ece7d399c5858d233.tar
drakx-2d3b13d3b7e6f08f6310467ece7d399c5858d233.tar.gz
drakx-2d3b13d3b7e6f08f6310467ece7d399c5858d233.tar.bz2
drakx-2d3b13d3b7e6f08f6310467ece7d399c5858d233.tar.xz
drakx-2d3b13d3b7e6f08f6310467ece7d399c5858d233.zip
no_comment
Diffstat (limited to 'perl-install/common.pm')
-rw-r--r--perl-install/common.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/common.pm b/perl-install/common.pm
index 4e5dccf9c..ee9101f96 100644
--- a/perl-install/common.pm
+++ b/perl-install/common.pm
@@ -204,7 +204,7 @@ sub warp_text($;$) {
my @l;
foreach (split "\n", $text) {
- my $t;
+ my $t = '';
foreach (split /\s+/, $_) {
if (length "$t $_" > $width) {
push @l, $t;