X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS%2FFS%2Fcust_event.pm;h=f299f937739c16bd0d3715bdb5bb49193adfbc14;hb=292ef074d01bb925e9a466ed771bf2ac418bb44f;hp=b29ab71bb5acd2a2fcbc8cd3e2d5fe0dc4671dc0;hpb=429a48b18a54917b73b3add468d930f60bcdb2fe;p=freeside.git diff --git a/FS/FS/cust_event.pm b/FS/FS/cust_event.pm index b29ab71bb..f299f9377 100644 --- a/FS/FS/cust_event.pm +++ b/FS/FS/cust_event.pm @@ -337,10 +337,6 @@ specified in HASHREF. Valid parameters are =item ending -=item payby - -=item - =back =cut @@ -434,13 +430,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 +477,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++;