X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS%2FFS%2Fcust_event.pm;h=d7a35a7a9f34de7ad3ae95a40e92e94f57e2fb0d;hb=42e878b29ae26943d7dc3acfbb7f095a56ae0a2f;hp=b29ab71bb5acd2a2fcbc8cd3e2d5fe0dc4671dc0;hpb=429a48b18a54917b73b3add468d930f60bcdb2fe;p=freeside.git diff --git a/FS/FS/cust_event.pm b/FS/FS/cust_event.pm index b29ab71bb..d7a35a7a9 100644 --- a/FS/FS/cust_event.pm +++ b/FS/FS/cust_event.pm @@ -434,13 +434,9 @@ sub process_refax { process_re_X('fax', @_); } -use Storable qw(thaw); use Data::Dumper; -use MIME::Base64; sub process_re_X { - my( $method, $job ) = ( shift, shift ); - - my $param = thaw(decode_base64(shift)); + my( $method, $job, $param ) = @_; warn Dumper($param) if $DEBUG; re_X( @@ -485,9 +481,10 @@ sub re_X { my $modenum = $part_event->option('modenum') || ''; my $invoice_from = $part_event->option('agent_invoice_from') || ''; $cust_X->set('mode' => $modenum); - $cust_X->$method( { template => $template, - modenum => $modenum, - invoice_from => $invoice_from } ); + $cust_X->$method( { template => $template, + modenum => $modenum, + from => $invoice_from, + } ); if ( $job ) { #progressbar foo $num++;