From b3c58cca6cc9191ad429f6a18471b2e9799a82fb Mon Sep 17 00:00:00 2001 From: Guillaume Cottenceau Date: Thu, 21 Nov 2002 15:55:13 +0000 Subject: use ask_warn when I should, and remove a one year old debug statement (???) --- perl-install/standalone/drakautoinst | 5 ++--- 1 file changed, 2 insertions(+), 3 deletions(-) (limited to 'perl-install/standalone') diff --git a/perl-install/standalone/drakautoinst b/perl-install/standalone/drakautoinst index de6e2c8d0..67401dcd6 100755 --- a/perl-install/standalone/drakautoinst +++ b/perl-install/standalone/drakautoinst @@ -30,7 +30,6 @@ use Data::Dumper; local $_ = join '', @ARGV; $::direct = /-direct/; -$::direct = 1; #DEBUG my $in = 'interactive'->vnew('su', 'default'); @@ -38,8 +37,8 @@ begin: $::isEmbedded and kill 'USR2', $::CCPID; my $imagefile = "/root/drakx/replay_install.img"; --f $imagefile or $in->ask_okcancel(N("Error!"), - N("I can't find needed image file `%s'.", $imagefile), 1), quit_global($in, 0); +-f $imagefile or $in->ask_warn(N("Error!"), + N("I can't find needed image file `%s'.", $imagefile), 1), quit_global($in, 0); $::direct or $in->ask_okcancel(N("Auto Install Configurator"), N("You are about to configure an Auto Install floppy. This feature is somewhat dangerous and must be used circumspectly. -- cgit v1.2.1