summaryrefslogtreecommitdiffstats
path: root/perl-install/standalone/drakautoinst
diff options
context:
space:
mode:
authorThierry Vignaud <tvignaud@mandriva.org>2004-02-16 16:49:53 +0000
committerThierry Vignaud <tvignaud@mandriva.org>2004-02-16 16:49:53 +0000
commitba8e8f1212675679d40009210454f62d26db2182 (patch)
treeb6cb9683eb255fde720be4e129857d90aa30c97c /perl-install/standalone/drakautoinst
parent2fdb9db2e8839891d304a31c21f83434048220d6 (diff)
downloaddrakx-ba8e8f1212675679d40009210454f62d26db2182.tar
drakx-ba8e8f1212675679d40009210454f62d26db2182.tar.gz
drakx-ba8e8f1212675679d40009210454f62d26db2182.tar.bz2
drakx-ba8e8f1212675679d40009210454f62d26db2182.tar.xz
drakx-ba8e8f1212675679d40009210454f62d26db2182.zip
do not abuse global namespace
Diffstat (limited to 'perl-install/standalone/drakautoinst')
-rwxr-xr-xperl-install/standalone/drakautoinst4
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/standalone/drakautoinst b/perl-install/standalone/drakautoinst
index 1714a5dae..a7faf4617 100755
--- a/perl-install/standalone/drakautoinst
+++ b/perl-install/standalone/drakautoinst
@@ -29,7 +29,7 @@ use Data::Dumper;
local $_ = join '', @ARGV;
-$::direct = /-direct/;
+my $direct = /-direct/;
my $in = 'interactive'->vnew('su', 'default');
@@ -37,7 +37,7 @@ my $imagefile = "/root/drakx/replay_install.img";
-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"),
+my $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.
With that feature, you will be able to replay the installation you've performed on this computer, being interactively prompted for some steps, in order to change their values.