diff options
author | Guillaume Cottenceau <gc@mandriva.com> | 2003-11-12 18:22:39 +0000 |
---|---|---|
committer | Guillaume Cottenceau <gc@mandriva.com> | 2003-11-12 18:22:39 +0000 |
commit | 2090df14b0609550e7644499d420a740539a15ff (patch) | |
tree | 5723b984a8c3bb144d658343612fd2456bcea6ca /perl-install | |
parent | 77165421b13e0b93315710198f23dcb7a62342ba (diff) | |
download | drakx-2090df14b0609550e7644499d420a740539a15ff.tar drakx-2090df14b0609550e7644499d420a740539a15ff.tar.gz drakx-2090df14b0609550e7644499d420a740539a15ff.tar.bz2 drakx-2090df14b0609550e7644499d420a740539a15ff.tar.xz drakx-2090df14b0609550e7644499d420a740539a15ff.zip |
prevent from FPE (even if I didn't see it duplicated)
Diffstat (limited to 'perl-install')
-rw-r--r-- | perl-install/ugtk2.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/ugtk2.pm b/perl-install/ugtk2.pm index 48688a826..2c187dcd1 100644 --- a/perl-install/ugtk2.pm +++ b/perl-install/ugtk2.pm @@ -748,7 +748,7 @@ sub wrap_paragraph { push @lines, @$lines; $width = max($width, $width_); $ydec += $height + 1; - } else { + } elsif (@lines) { #- void line my $yvoid = $ydec / @lines; push @widths, 0; |