From 8333ae40534dd25c99d345b1f2f04b3e5e513731 Mon Sep 17 00:00:00 2001
From: Olivier Blin <oblin@mandriva.com>
Date: Wed, 28 Oct 2009 18:17:27 +0000
Subject: make sure sizes and widths are int

---
 perl-install/fs/partitioning_wizard.pm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/perl-install/fs/partitioning_wizard.pm b/perl-install/fs/partitioning_wizard.pm
index b1c1dba57..e9c35c570 100644
--- a/perl-install/fs/partitioning_wizard.pm
+++ b/perl-install/fs/partitioning_wizard.pm
@@ -149,7 +149,7 @@ sub partitionWizardSolutions {
                         my $suggested_size = max(
                             $part->{min_win} + 1*MB(1024),
                             min(
-                                $part->{size} - 0.1 * ($part->{size} - $part->{min_win}),
+                                $part->{size} - int(0.1 * ($part->{size} - $part->{min_win})),
                                 $part->{size} - 6*MB(1024),
                             ),
                         );
@@ -310,7 +310,7 @@ sub create_display_box {
 	my $part_info = Gtk2::Label->new($entry->{device_LABEL});
 	my @colorized_fs_types = qw(ext2 ext3 ext4 xfs swap vfat ntfs ntfs-3g);
         my $part_widget = Gtk2::EventBox->new;
-        $entry->{width} = $entry->{size} * $initial_ratio + $minwidth;
+        $entry->{width} = int($entry->{size} * $initial_ratio) + $minwidth;
         if ($last && $last->{device} eq $entry->{device}) {
             #- entry is the last resizable partition
 
-- 
cgit v1.2.1