From: ivan <ivan>
Date: Fri, 27 Aug 2004 11:33:21 +0000 (+0000)
Subject: oops use @ARGV not @_
X-Git-Tag: freeside_1_5_0beforepre6^2~66
X-Git-Url: http://git.freeside.biz/gitweb/?a=commitdiff_plain;h=4f9e876b1e2549e09bafc85289951bbb973194aa;p=freeside.git

oops use @ARGV not @_
---

diff --git a/FS/bin/freeside-sqlradius-reset b/FS/bin/freeside-sqlradius-reset
index 95b7ef21e..d87cd4511 100755
--- a/FS/bin/freeside-sqlradius-reset
+++ b/FS/bin/freeside-sqlradius-reset
@@ -13,8 +13,8 @@ adminsuidsetup $user;
 #my $machine = shift or die &usage;
 
 my @exports = ();
-if ( @_ ) {
-  foreach my $exportnum ( @_ ) {
+if ( @ARGV ) {
+  foreach my $exportnum ( @ARGV ) {
     foreach my $exporttype (qw( sqlradius sqlradius_withdomain )) {
     push @exports, qsearch('part_export', { exportnum  => $exportnum,
                                             exporttype => $exporttype, } );