From 0ca23c4869d779c99dd2b4af0f3e11a6f50f5a24 Mon Sep 17 00:00:00 2001
From: Olivier Blin <oblin@mandriva.com>
Date: Wed, 28 Oct 2009 16:25:22 +0000
Subject: use ratio variable

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

(limited to 'perl-install/fs')

diff --git a/perl-install/fs/partitioning_wizard.pm b/perl-install/fs/partitioning_wizard.pm
index 4f9a639d8..8919677cc 100644
--- a/perl-install/fs/partitioning_wizard.pm
+++ b/perl-install/fs/partitioning_wizard.pm
@@ -360,7 +360,7 @@ sub create_display_box {
                 0;
             };
             my $update_req_size = sub {
-                $part->{req_size} = int($hpane->get_position * $part->{size} / $part->{width});
+                $part->{req_size} = int($hpane->get_position / $ratio);
                 $update_size_labels->();
             };
             my $button_activate = sub {
-- 
cgit v1.2.1