DCQ:prepare 2.0.0

[modules/superv.git] / src / Supervision / SNode_Impl.cxx

diff --git a/src/Supervision/SNode_Impl.cxx b/src/Supervision/SNode_Impl.cxx
index 1d6b83e6faf1ef7763cd2956134590e600efb59f..d1d0275671888953f9f02606c48c49b4434825dc 100644 (file)
--- a/src/Supervision/SNode_Impl.cxx
+++ b/src/Supervision/SNode_Impl.cxx
@@ -95,6 +95,7 @@ bool SNode_Impl::Delete() {
 //  beginService( "SNode_Impl::Delete" );
   bool RetVal = false ;
   if ( DataFlowEditor()->IsEditing() ) {
+    DeletePorts() ;
     RetVal = DataFlowEditor()->RemoveNode( Name() ) ;
     if ( RetVal )
       RetVal = DataFlowEditor()->IsValid() ;