From 2090df14b0609550e7644499d420a740539a15ff Mon Sep 17 00:00:00 2001
From: Guillaume Cottenceau <gc@mandriva.com>
Date: Wed, 12 Nov 2003 18:22:39 +0000
Subject: prevent from FPE (even if I didn't see it duplicated)

---
 perl-install/ugtk2.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

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;
-- 
cgit v1.2.1