diff options
| author | Ivan Kohler <ivan@freeside.biz> | 2019-04-24 14:49:17 -0700 |
|---|---|---|
| committer | Ivan Kohler <ivan@freeside.biz> | 2019-04-24 14:49:17 -0700 |
| commit | ef637ed03ffd57f63e3ae50f4c073a965f463946 (patch) | |
| tree | c87dcf0c7ecbccb6480d7a6ff8d1bb711049c3d2 /FS/FS/part_export.pm | |
| parent | 1f8b0f2daa0e9250e5432d3aa6156d173332fa99 (diff) | |
fix northern-911 and other unsuspend operations when exports override export_replace, RT#83178
Diffstat (limited to 'FS/FS/part_export.pm')
| -rw-r--r-- | FS/FS/part_export.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/FS/FS/part_export.pm b/FS/FS/part_export.pm index 1a8f43d..96fb85f 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 |