X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=httemplate%2Fmisc%2Fupload-batch.cgi;h=5b4961be336583a474a10f3ff12966ceb52412ca;hb=6c28b9f6445e9ca8f3f84aaf8f3e61be47c15515;hp=742bbc0c69dfe1aceec01a0550b95ad2276ed146;hpb=c8cccb4a92adceb943c635fe62dad0d034462ce0;p=freeside.git 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( {