diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2003-09-03 15:51:17 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2003-09-03 15:51:17 +0000 |
commit | 49924b81a16c0f357c1957d5e638262db2f4e7d0 (patch) | |
tree | f88a7ee445de3207de75a4dd6550d6bb49d2061d /perl-install | |
parent | 81d6413c405daa29608cd893714536489b38be14 (diff) | |
download | drakx-49924b81a16c0f357c1957d5e638262db2f4e7d0.tar drakx-49924b81a16c0f357c1957d5e638262db2f4e7d0.tar.gz drakx-49924b81a16c0f357c1957d5e638262db2f4e7d0.tar.bz2 drakx-49924b81a16c0f357c1957d5e638262db2f4e7d0.tar.xz drakx-49924b81a16c0f357c1957d5e638262db2f4e7d0.zip |
require resize_fat::main when needed (fix bug #5204)
Diffstat (limited to 'perl-install')
-rw-r--r-- | perl-install/diskdrake/hd_gtk.pm | 1 | ||||
-rw-r--r-- | perl-install/diskdrake/interactive.pm | 1 |
2 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/diskdrake/hd_gtk.pm b/perl-install/diskdrake/hd_gtk.pm index a2316a050..5342b939b 100644 --- a/perl-install/diskdrake/hd_gtk.pm +++ b/perl-install/diskdrake/hd_gtk.pm @@ -4,7 +4,6 @@ use diagnostics; use strict; use common; -use resize_fat::main; use ugtk2 qw(:helpers :wrappers :create); use partition_table qw(:types); use partition_table::raw; diff --git a/perl-install/diskdrake/interactive.pm b/perl-install/diskdrake/interactive.pm index 410391a13..3cf8d1f14 100644 --- a/perl-install/diskdrake/interactive.pm +++ b/perl-install/diskdrake/interactive.pm @@ -650,6 +650,7 @@ sub Resize { #- try to resize without losing data my $_w = $in->wait_message(N("Resizing"), N("Computing FAT filesystem bounds")); + require resize_fat::main; $nice_resize{fat} = resize_fat::main->new($part->{device}, devices::make($part->{device})); $min = max($min, $nice_resize{fat}->min_size); $max = min($max, $nice_resize{fat}->max_size); |