diff options
| author | Pascal Rigaux <pixel@mandriva.com> | 2003-02-19 23:26:37 +0000 |
|---|---|---|
| committer | Pascal Rigaux <pixel@mandriva.com> | 2003-02-19 23:26:37 +0000 |
| commit | 974b27d91eca1219e62e649f3545eaed52a97794 (patch) | |
| tree | b32b401f3935d9790168134fc356a5f6a56cd917 /perl-install/install_interactive.pm | |
| parent | 084c1e96320e5dd0a90ce48a657c6ee6cad454e7 (diff) | |
| download | drakx-backup-do-not-use-974b27d91eca1219e62e649f3545eaed52a97794.tar drakx-backup-do-not-use-974b27d91eca1219e62e649f3545eaed52a97794.tar.gz drakx-backup-do-not-use-974b27d91eca1219e62e649f3545eaed52a97794.tar.bz2 drakx-backup-do-not-use-974b27d91eca1219e62e649f3545eaed52a97794.tar.xz drakx-backup-do-not-use-974b27d91eca1219e62e649f3545eaed52a97794.zip | |
add some formatError's
Diffstat (limited to 'perl-install/install_interactive.pm')
| -rw-r--r-- | perl-install/install_interactive.pm | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/perl-install/install_interactive.pm b/perl-install/install_interactive.pm index 7ec90b709..e7287bd82 100644 --- a/perl-install/install_interactive.pm +++ b/perl-install/install_interactive.pm @@ -151,7 +151,7 @@ sub partitionWizardSolutions { $pkg->new($part->{device}, devices::make($part->{device})); }; $@ and die N("The FAT resizer is unable to handle your partition, -the following error occured: %s", $@); +the following error occured: %s", formatError($@)); my $min_win = do { my $_w = $o->wait_message(N("Resizing"), N("Computing the size of the Windows partition")); $resize_fat->min_size; @@ -186,7 +186,7 @@ When sure, press Ok.")) or return; }; if (my $err = $@) { $part->{size} = $oldsize; - die N("FAT resizing failed: %s", $err); + die N("FAT resizing failed: %s", formatError($err)); } $part->{isFormatted} = 1; @@ -271,7 +271,7 @@ sub partitionWizard { [ { val => \$sol, list => \@solutions, format => sub { $_[0][1] }, type => 'list' } ]); log::l("partitionWizard calling solution $sol->[1]"); my $ok = eval { $sol->[2]->() }; - $@ and $o->ask_warn('', N("Partitioning failed: %s", $@)); + $@ and $o->ask_warn('', N("Partitioning failed: %s", formatError($@))); $ok or goto &partitionWizard; 1; } |