summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2003-09-17 12:20:29 +0000
committerPascal Rigaux <pixel@mandriva.com>2003-09-17 12:20:29 +0000
commitf1615a7c99c9a4bef518de08b53cf4076e421c76 (patch)
tree40d7d6e9d6860fed1759fdae716291a8d65a6a46 /perl-install
parent08ec04cc84d14cb3d4c8b4934c5a07e2668b81ae (diff)
downloaddrakx-f1615a7c99c9a4bef518de08b53cf4076e421c76.tar
drakx-f1615a7c99c9a4bef518de08b53cf4076e421c76.tar.gz
drakx-f1615a7c99c9a4bef518de08b53cf4076e421c76.tar.bz2
drakx-f1615a7c99c9a4bef518de08b53cf4076e421c76.tar.xz
drakx-f1615a7c99c9a4bef518de08b53cf4076e421c76.zip
don't display a wait_message together with the write_partitions() dialog
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/diskdrake/interactive.pm3
1 files changed, 2 insertions, 1 deletions
diff --git a/perl-install/diskdrake/interactive.pm b/perl-install/diskdrake/interactive.pm
index af9109b9e..68cfeaee8 100644
--- a/perl-install/diskdrake/interactive.pm
+++ b/perl-install/diskdrake/interactive.pm
@@ -711,7 +711,6 @@ sub Resize {
undef $@;
my $_b = before_leaving { $@ and $part->{size} = $oldsize };
- my $wait = $in->wait_message(N("Resizing"), '');
my $adjust = sub {
my ($write_partitions) = @_;
@@ -728,6 +727,8 @@ sub Resize {
$adjust->(1) or return if $size > $oldsize;
+ my $wait = $in->wait_message(N("Resizing"), '');
+
if ($nice_resize{fat}) {
local *log::l = sub { $wait->set(join(' ', @_)) };
$nice_resize{fat}->resize($part->{size});