X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS%2FFS%2Fpart_svc.pm;h=bb4f6d649b0d6d73bc440484615d088d49d5b2ec;hb=381805cd7fe1eb2d3ae664fee866f18f93fe7631;hp=3ed153e0cc66797d3e0d1ee1bbe7bb4bd5082d3e;hpb=624b2d44625f69d71175c3348cae635d580c890b;p=freeside.git diff --git a/FS/FS/part_svc.pm b/FS/FS/part_svc.pm index 3ed153e0c..bb4f6d649 100644 --- a/FS/FS/part_svc.pm +++ b/FS/FS/part_svc.pm @@ -801,6 +801,9 @@ sub process_bulk_cust_svc { my $param = thaw(decode_base64(shift)); warn Dumper($param) if $DEBUG; + local($FS::svc_Common::noexport_hack) = 1 + if $param->{'noexport'}; + my $old_part_svc = qsearchs('part_svc', { 'svcpart' => $param->{'old_svcpart'} } );