X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS%2FFS%2Fpart_export%2Fvoip_ms.pm;h=1eedd66acf9901fa1361698debf0049576e0a752;hb=7be116339beee253f9bf8805076c766cf0f8e318;hp=2519884854d863457baec57b8d3a6db96d3cc1d5;hpb=0a2c29c0f22bee8cb30ef4eea31881ab1ae525f7;p=freeside.git diff --git a/FS/FS/part_export/voip_ms.pm b/FS/FS/part_export/voip_ms.pm index 251988485..1eedd66ac 100644 --- a/FS/FS/part_export/voip_ms.pm +++ b/FS/FS/part_export/voip_ms.pm @@ -133,7 +133,7 @@ our %info = ( END ); -sub export_insert { +sub _export_insert { my($self, $svc_x) = (shift, shift); my $role = $self->svc_role($svc_x); @@ -162,7 +162,7 @@ sub export_insert { ''; } -sub export_replace { +sub _export_replace { my ($self, $svc_new, $svc_old) = @_; my $role = $self->svc_role($svc_new); my $error; @@ -175,7 +175,7 @@ sub export_replace { ''; } -sub export_delete { +sub _export_delete { my ($self, $svc_x) = (shift, shift); my $role = $self->svc_role($svc_x); if ( $role eq 'subacct' ) { @@ -204,7 +204,7 @@ sub export_delete { ''; } -sub export_suspend { +sub _export_suspend { my $self = shift; my $svc_x = shift; my $role = $self->svc_role($svc_x); @@ -215,7 +215,7 @@ sub export_suspend { ''; } -sub export_unsuspend { +sub _export_unsuspend { my $self = shift; my $svc_x = shift; my $role = $self->svc_role($svc_x);