From: Christopher Burger <burgerc@freeside.biz>
Date: Fri, 30 Mar 2018 00:13:53 +0000 (-0400)
Subject: RT# 78356 - fixed v3 error with save
X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=commitdiff_plain;h=24bf56f635ae27fb6c7fcf8571e3eeedef60936d;hp=d9f02dd085aef4e8d8579cd34be0c6991ccf4f44

RT# 78356 - fixed v3 error with save
---

diff --git a/FS/FS/part_export/saisei.pm b/FS/FS/part_export/saisei.pm
index 922a347b6..f54e6940c 100644
--- a/FS/FS/part_export/saisei.pm
+++ b/FS/FS/part_export/saisei.pm
@@ -5,6 +5,7 @@ use vars qw( @ISA %info );
 use base qw( FS::part_export );
 use Date::Format 'time2str';
 use Cpanel::JSON::XS;
+use Storable qw(thaw);
 use MIME::Base64;
 use REST::Client;
 use Data::Dumper;
@@ -780,7 +781,7 @@ sub process_sector {
 
 sub export_provisioned_services {
   my $job = shift;
-  my $param = shift;
+  my $param = thaw(decode_base64(shift));
 
   my $part_export = FS::Record::qsearchs('part_export', { 'exportnum' => $param->{export_provisioned_services_exportnum}, } )
   or die "unknown exportnum $param->{export_provisioned_services_exportnum}";