X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS%2FFS%2Fcontact%2FImport.pm;h=7a71349bcf2cde3f9a95b9ad5860c981045b9960;hb=c2b9c73711f245627492595320e18d3d986d61a6;hp=26bdcfa6e6e16d69721d80a60c4df2ecb246fb45;hpb=b11b95320dcb860212129de464d6349e4ac6da5e;p=freeside.git diff --git a/FS/FS/contact/Import.pm b/FS/FS/contact/Import.pm index 26bdcfa6e..7a71349bc 100644 --- a/FS/FS/contact/Import.pm +++ b/FS/FS/contact/Import.pm @@ -2,6 +2,8 @@ package FS::contact::Import; use strict; use vars qw( $DEBUG ); #$conf ); +use Storable qw(thaw); +use MIME::Base64; use Data::Dumper; use FS::Misc::DateTime qw( parse_datetime ); use FS::Record qw( qsearchs ); @@ -49,7 +51,8 @@ Load a batch import as a queued JSRPC job sub process_batch_import { my $job = shift; - my $param = shift; + #my $param = shift; + my $param = thaw(decode_base64(shift)); warn Dumper($param) if $DEBUG; my $files = $param->{'uploaded_files'}