X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=FS%2FFS%2Fnas.pm;h=af5a23a24d470fd2c176d0b025ff9d04fca1717d;hp=4564a634206c0083c8a7cd51c7dbcf6a8c0a64c2;hb=aed8ec35ccb9cdeb7ea0cb6ff2946f9d83d582f6;hpb=1e1a0a1a7945cae26175e3afe25e61ec6114c48e

diff --git a/FS/FS/nas.pm b/FS/FS/nas.pm
index 4564a6342..af5a23a24 100644
--- a/FS/FS/nas.pm
+++ b/FS/FS/nas.pm
@@ -87,8 +87,11 @@ sub delete {
   my $dbh = dbh;
 
   my $self = shift;
-  my $error = $self->process_m2m([])
-           || $self->SUPER::delete;
+  my $error = $self->process_m2m(
+    link_table    => 'export_nas',
+    target_table  => 'part_export',
+    params        => []
+  ) || $self->SUPER::delete;
 
   if ( $error ) {
     $dbh->rollback;