diff options
| author | jeff <jeff> | 2007-01-10 00:42:23 +0000 |
|---|---|---|
| committer | jeff <jeff> | 2007-01-10 00:42:23 +0000 |
| commit | e8e43b0e59cf50e7a3c0789f589046459bc658c1 (patch) | |
| tree | cbfc81857e7f81645acb39f2a9a0c12de9c55687 /httemplate/misc/upload-batch.cgi | |
| parent | a3e2c44624aa50e408046e77e6b1cd5d9c20b4c2 (diff) | |
ignore filenames and rely on selected batch number
Diffstat (limited to 'httemplate/misc/upload-batch.cgi')
| -rw-r--r-- | httemplate/misc/upload-batch.cgi | 6 |
1 files changed, 2 insertions, 4 deletions
diff --git a/httemplate/misc/upload-batch.cgi b/httemplate/misc/upload-batch.cgi index 742bbc0c6..5b4961be3 100644 --- a/httemplate/misc/upload-batch.cgi +++ b/httemplate/misc/upload-batch.cgi @@ -1,10 +1,8 @@ % % % my $fh = $cgi->upload('batch_results'); -% my $filename = $cgi->param('batch_results'); -% $filename =~ /^(.*[\/\\])?([^\/\\]+)$/ -% or die "unparsable filename: $filename\n"; -% my $paybatch = $2; +% $cgi->param('batchnum') =~ /^(\d+)$/; +% my $paybatch = $1; % % my $error = defined($fh) % ? FS::cust_pay_batch::import_results( { |