From 88935cd2fb171cadfa690492a322af403a4ba4d3 Mon Sep 17 00:00:00 2001
From: akl <akl@opencascade.com>
Date: Fri, 23 Mar 2007 14:09:47 +0000
Subject: [PATCH] To update MergeEqualElements() interface in accordance with
 PAL13190 improvement.

---
 src/SMESHGUI/SMESHGUI_SewingDlg.cxx | 7 +++++--
 src/SMESH_I/SMESH_Gen_i.cxx         | 5 ++++-
 2 files changed, 9 insertions(+), 3 deletions(-)

diff --git a/src/SMESHGUI/SMESHGUI_SewingDlg.cxx b/src/SMESHGUI/SMESHGUI_SewingDlg.cxx
index 048d93cab..cefe45d6b 100644
--- a/src/SMESHGUI/SMESHGUI_SewingDlg.cxx
+++ b/src/SMESHGUI/SMESHGUI_SewingDlg.cxx
@@ -561,8 +561,11 @@ bool SMESHGUI_SewingDlg::ClickOnApply()
       }
       aResult = (anError == SMESH::SMESH_MeshEditor::SEW_OK);
 
-      if (toMerge && aResult)
-        aMeshEditor->MergeEqualElements();
+      if (toMerge && aResult) {
+	SMESH::array_of_long_array_var aGroupsOfElementsID = new SMESH::array_of_long_array;
+	aMeshEditor->FindEqualElements(myMesh, aGroupsOfElementsID);
+        aMeshEditor->MergeEqualElements(aGroupsOfElementsID.inout());
+      }
 
       QApplication::restoreOverrideCursor();
 
diff --git a/src/SMESH_I/SMESH_Gen_i.cxx b/src/SMESH_I/SMESH_Gen_i.cxx
index 6461586bd..06e6981ee 100644
--- a/src/SMESH_I/SMESH_Gen_i.cxx
+++ b/src/SMESH_I/SMESH_Gen_i.cxx
@@ -1319,7 +1319,10 @@ SMESH::SMESH_Mesh_ptr SMESH_Gen_i::Concatenate(const SMESH::mesh_array& theMeshe
 	aNewEditor.FindCoincidentNodes( aMeshNodes, theMergeTolerance, aGroupsOfNodes );
 	aNewEditor.MergeNodes( aGroupsOfNodes );
 	// merge elements
-	aNewEditor.MergeEqualElements();
+	set<const SMDS_MeshElement*> aMeshElements; // no input elements
+	SMESH_MeshEditor::TListOfListOfElementsID aGroupsOfElementsID;
+	aNewEditor.FindEqualElements(aMeshElements, aGroupsOfElementsID);
+	aNewEditor.MergeEqualElements(aGroupsOfElementsID);
       }
     }
   }
-- 
2.30.2