From a4797375986c5545dd19a7470351d3febe1a9a6d Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tvignaud@mandriva.org>
Date: Thu, 22 Dec 2005 12:32:24 +0000
Subject: add support for $::no_global_argv_parsing, enabling to NOT using
 common option managemnt (eg: when using Getopt)

---
 perl-install/standalone.pm | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

(limited to 'perl-install/standalone.pm')

diff --git a/perl-install/standalone.pm b/perl-install/standalone.pm
index 2ffdc883e..ec5b379c5 100644
--- a/perl-install/standalone.pm
+++ b/perl-install/standalone.pm
@@ -140,6 +140,7 @@ Copyright (C) 1999-2004 Mandriva by <install@mandriva.com>
 ',  $::license, "\n";
 }
 
+if (!$::no_global_argv_parsing) {
 my ($i, @new_ARGV);
 foreach (@ARGV) {
     $i++;
@@ -171,7 +172,7 @@ foreach (@ARGV) {
 }
 
 @ARGV = @new_ARGV;
-
+}
 
 ################################################################################
 
-- 
cgit v1.2.1