From 44261274cf5d0bf453005c50d43050143cd18774 Mon Sep 17 00:00:00 2001
From: ivan <ivan>
Date: Mon, 3 Apr 2000 02:32:57 +0000
Subject: [PATCH] accept anything in ARGV for -d Date::Parse

---
 FS/bin/freeside-bill | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/FS/bin/freeside-bill b/FS/bin/freeside-bill
index 417df767b..208f92071 100755
--- a/FS/bin/freeside-bill
+++ b/FS/bin/freeside-bill
@@ -72,7 +72,9 @@ foreach $cust_main (
 
 sub untaint_argv {
   foreach $_ ( $[ .. $#ARGV ) { #untaint @ARGV
-    $ARGV[$_] =~ /^([\w\-\/]*)$/ || die "Illegal arguement \"$ARGV[$_]\"";
+    #$ARGV[$_] =~ /^([\w\-\/]*)$/ || die "Illegal arguement \"$ARGV[$_]\"";
+    # Date::Parse
+    $ARGV[$_] =~ /^(.*)$/ || die "Illegal arguement \"$ARGV[$_]\"";
     $ARGV[$_]=$1;
   }
 }
@@ -112,7 +114,7 @@ customers.  Otherwise, bills all customers.
 
 =head1 VERSION
 
-$Id: freeside-bill,v 1.3 1999-10-04 08:23:26 ivan Exp $
+$Id: freeside-bill,v 1.4 2000-04-03 02:32:57 ivan Exp $
 
 =head1 BUGS
 
-- 
2.11.0