diff options
author | Thierry Vignaud <tvignaud@mandriva.org> | 2004-02-16 16:49:53 +0000 |
---|---|---|
committer | Thierry Vignaud <tvignaud@mandriva.org> | 2004-02-16 16:49:53 +0000 |
commit | ba8e8f1212675679d40009210454f62d26db2182 (patch) | |
tree | b6cb9683eb255fde720be4e129857d90aa30c97c /perl-install/standalone/drakautoinst | |
parent | 2fdb9db2e8839891d304a31c21f83434048220d6 (diff) | |
download | drakx-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-x | perl-install/standalone/drakautoinst | 4 |
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. |