diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2000-04-17 15:42:29 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2000-04-17 15:42:29 +0000 |
commit | dddfb90059117e6dde52c09e79ba0c8672942b53 (patch) | |
tree | 351bfc56411ea5e33782e579e7291ed783023b4c /perl-install/install_steps_gtk.pm | |
parent | e2ab672b87d900beabb21632833e2f97d475b09a (diff) | |
download | drakx-dddfb90059117e6dde52c09e79ba0c8672942b53.tar drakx-dddfb90059117e6dde52c09e79ba0c8672942b53.tar.gz drakx-dddfb90059117e6dde52c09e79ba0c8672942b53.tar.bz2 drakx-dddfb90059117e6dde52c09e79ba0c8672942b53.tar.xz drakx-dddfb90059117e6dde52c09e79ba0c8672942b53.zip |
no_comment
Diffstat (limited to 'perl-install/install_steps_gtk.pm')
-rw-r--r-- | perl-install/install_steps_gtk.pm | 12 |
1 files changed, 7 insertions, 5 deletions
diff --git a/perl-install/install_steps_gtk.pm b/perl-install/install_steps_gtk.pm index 651259c84..2c61db33b 100644 --- a/perl-install/install_steps_gtk.pm +++ b/perl-install/install_steps_gtk.pm @@ -122,7 +122,7 @@ sub new($$) { sub enteringStep { my ($o, $step) = @_; - print _("Entering step `%s'\n", $o->{steps}{$step}{text}); + print _("Entering step `%s'\n", translate($o->{steps}{$step}{text})); $o->SUPER::enteringStep($step); create_steps_window($o); create_help_window($o); @@ -189,9 +189,11 @@ sub doPartitionDisks { if ($o->{lnx4win}) { eval { install_steps::doPartitionDisks(@_) }; - $@ =~ /no fat/ or return; - - $o->ask_warn('', _("You don't have any windows partitions!")); + if ($@ =~ /no fat/) { + $o->ask_warn('', _("You don't have any windows partitions!")); + } elsif ($@ =~ /not enough room/) { + $o->ask_warn('', _("You don't have any enough room for Lnx4win")); + } else { return } delete $o->{lnx4win}; } if ($::beginner && fsedit::is_one_big_fat($hds)) { @@ -201,7 +203,7 @@ sub doPartitionDisks { my $min_freewin = 300 << 11; my ($part) = fsedit::get_fstab(@{$o->{hds}}); - my $w = $o->wait_message(_("Resizing"), _("Computing fat filesystem bounds")); + my $w = $o->wait_message(_("Resizing"), _("Computing FAT filesystem bounds")); my $resize_fat = eval { resize_fat::main->new($part->{device}, devices::make($part->{device})) }; $@ and goto diskdrake; my $min_win = $resize_fat->min_size; |