X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS%2FFS%2Fsvc_Common.pm;fp=FS%2FFS%2Fsvc_Common.pm;h=c40488db461e14d2cc533ff73b5c12f82b86e8d2;hb=ce73ae43d0d86472e239226c28c99ced5b72c2e7;hp=dd9731e9b682d28e527d21dc801b5d3417887177;hpb=7ed03cd3b992a5df6c786686a5271eea65611dbc;p=freeside.git

diff --git a/FS/FS/svc_Common.pm b/FS/FS/svc_Common.pm
index dd9731e9b..c40488db4 100644
--- a/FS/FS/svc_Common.pm
+++ b/FS/FS/svc_Common.pm
@@ -477,6 +477,7 @@ passed to export commands.
 
 sub replace {
   my $new = shift;
+  $noexport_hack = $new->no_export if $new->no_export;
 
   my $old = ( blessed($_[0]) && $_[0]->isa('FS::Record') )
               ? shift