diff options
author | Thierry Vignaud <tvignaud@mandriva.org> | 2002-11-25 08:27:25 +0000 |
---|---|---|
committer | Thierry Vignaud <tvignaud@mandriva.org> | 2002-11-25 08:27:25 +0000 |
commit | 08ca1e06eafd62d11f4d6dd97c09730997d5474c (patch) | |
tree | a1e6459d91ceaf84b5f58d345c85057b9c5b68a8 /perl-install | |
parent | 8e36daafd79865c3d1d8ccf71efb1e1f13238299 (diff) | |
download | drakx-backup-do-not-use-08ca1e06eafd62d11f4d6dd97c09730997d5474c.tar drakx-backup-do-not-use-08ca1e06eafd62d11f4d6dd97c09730997d5474c.tar.gz drakx-backup-do-not-use-08ca1e06eafd62d11f4d6dd97c09730997d5474c.tar.bz2 drakx-backup-do-not-use-08ca1e06eafd62d11f4d6dd97c09730997d5474c.tar.xz drakx-backup-do-not-use-08ca1e06eafd62d11f4d6dd97c09730997d5474c.zip |
- simplify --embedded handling
- stricter matching on --no-autoc
Diffstat (limited to 'perl-install')
-rw-r--r-- | perl-install/standalone.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/standalone.pm b/perl-install/standalone.pm index 9f14e971f..1ed61d44d 100644 --- a/perl-install/standalone.pm +++ b/perl-install/standalone.pm @@ -119,11 +119,11 @@ foreach (@ARGV) { version(); exit(0); } elsif (/^--embedded$/) { - (undef, $::XID, $::CCPID) = splice @ARGV, ($i-1), 3; + ($::XID, $::CCPID) = splice @ARGV, $i, 2; $::isEmbedded = 1; } elsif (/^--expert$/) { $::expert = 1; - } elsif (/--noauto$/) { + } elsif (/^--noauto$/) { $::noauto = /-noauto/; } elsif (/^--auto$/) { $::auto = 1; |