From f5f5c7250b85fd56c69bb17e6ac28a1974c3a376 Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Thu, 13 Feb 2003 11:34:46 +0000
Subject: help perl_checker

---
 perl-install/standalone/drakupdate_fstab | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'perl-install')

diff --git a/perl-install/standalone/drakupdate_fstab b/perl-install/standalone/drakupdate_fstab
index 3285daac7..73c308bda 100755
--- a/perl-install/standalone/drakupdate_fstab
+++ b/perl-install/standalone/drakupdate_fstab
@@ -29,8 +29,8 @@ use fs;
 
 $::isStandalone = 1; #- not using standalone.pm which generates too many logs for drakupdate_fstab purpose
 
-$::testing = $ARGV[0] eq '--test' && shift;
-$::auto = $ARGV[0] eq '--auto' && shift;
+$::testing = $ARGV[0] eq '--test' && shift @ARGV;
+$::auto = $ARGV[0] eq '--auto' && shift @ARGV;
 my ($raw_action, $device_name) = @ARGV;
 my ($action) = $raw_action =~ /^--(add|del)/;
 
-- 
cgit v1.2.1