From a1cd54dd7250397b4c8dee3795bac575a82853ab Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Fri, 23 Mar 2001 17:19:26 +0000 Subject: (exitInstall): no "cancel" button --- perl-install/install_steps_interactive.pm | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) (limited to 'perl-install') diff --git a/perl-install/install_steps_interactive.pm b/perl-install/install_steps_interactive.pm index d5bb65dec..e7f4e6e09 100644 --- a/perl-install/install_steps_interactive.pm +++ b/perl-install/install_steps_interactive.pm @@ -34,8 +34,7 @@ use log; #-###################################################################################### sub errorInStep($$) { my ($o, $err) = @_; - $err =~ s/ at .*?$/\./ unless $::testing; #- avoid error message. - $o->ask_warn(_("Error"), [ _("An error occurred"), $err ]); + $o->ask_warn(_("Error"), [ _("An error occurred"), common::formatError($err) ]); } sub kill_action { @@ -1129,8 +1128,9 @@ For information on fixes which are available for this release of Linux-Mandrake, consult the Errata available from http://www.linux-mandrake.com/. Information on configuring your system is available in the post -install chapter of the Official Linux-Mandrake User's Guide.") - }, +install chapter of the Official Linux-Mandrake User's Guide."), + cancel => '', + }, [ if_($::expert, { val => \ (my $t1 = _("Generate auto install floppy")), clicked => sub { -- cgit v1.2.1