X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS%2FFS%2Fpart_export.pm;h=96fb85fc38883de1fa834b003d001958ba6bb3a4;hb=c2dbe36096332d1e09bc58d7d9903e05247f0c9b;hp=1a8f43de10097174ba511ece6f4ad7bdc0b0e488;hpb=d5988a9f7a3617de33da3058f2e9f1151b24420e;p=freeside.git

diff --git a/FS/FS/part_export.pm b/FS/FS/part_export.pm
index 1a8f43de1..96fb85fc3 100644
--- a/FS/FS/part_export.pm
+++ b/FS/FS/part_export.pm
@@ -666,7 +666,7 @@ sub _export_suspend {
   #warn "warning: _export_suspened unimplemented for". ref($self);
   my $svc_x = shift;
   my $new = $svc_x->clone_suspended;
-  $self->_export_replace( $new, $svc_x );
+  $self->export_replace( $new, $svc_x );
 }
 
 sub _export_unsuspend {
@@ -674,7 +674,7 @@ sub _export_unsuspend {
   #warn "warning: _export_unsuspend unimplemented for ". ref($self);
   my $svc_x = shift;
   my $old = $svc_x->clone_kludge_unsuspend;
-  $self->_export_replace( $svc_x, $old );
+  $self->export_replace( $svc_x, $old );
 }
 
 =item get_remoteid SVC