diff options
| author | ivan <ivan> | 2000-04-03 02:32:57 +0000 |
|---|---|---|
| committer | ivan <ivan> | 2000-04-03 02:32:57 +0000 |
| commit | 44261274cf5d0bf453005c50d43050143cd18774 (patch) | |
| tree | f9360f9ac1d8603fc5eb1a8160ed0b89dd96c0f2 | |
| parent | e3aaca5c08b8b39627978eb30d10dfb241946b93 (diff) | |
accept anything in ARGV for -d Date::Parse
| -rwxr-xr-x | FS/bin/freeside-bill | 6 |
1 files 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 |