diff options
author | Pascal Rigaux <pixel@mandriva.com> | 1999-08-28 10:19:54 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 1999-08-28 10:19:54 +0000 |
commit | 2d3b13d3b7e6f08f6310467ece7d399c5858d233 (patch) | |
tree | 61e0a5cc6284c4e8dc138385da6329f2b8e83e0f /perl-install/common.pm | |
parent | 90f7bb2359c71498b66bf6eb4ed764671816ace6 (diff) | |
download | drakx-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.pm | 2 |
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; |