diff --git a/Mesh/Read_Mesh.cpp b/Mesh/Read_Mesh.cpp
index 11453498b5e4ecddf1a9b76dbb8d2d788d329f1e..b27be5acdae26f675fe2981776a87160c014b253 100644
--- a/Mesh/Read_Mesh.cpp
+++ b/Mesh/Read_Mesh.cpp
@@ -1,4 +1,4 @@
-// $Id: Read_Mesh.cpp,v 1.64 2003-12-08 15:31:57 geuzaine Exp $
+// $Id: Read_Mesh.cpp,v 1.65 2003-12-08 15:51:17 geuzaine Exp $
 //
 // Copyright (C) 1997-2003 C. Geuzaine, J.-F. Remacle
 //
@@ -72,7 +72,7 @@ void addPhysicalGroup(Mesh * M, int Type, int Physical, int Elementary)
   pg->Num = Physical;
   if((ppg = (PhysicalGroup **) List_PQuery(M->PhysicalGroups, &pg,
                                            comparePhysicalGroup))) {
-    List_Replace((*ppg)->Entities, &Elementary, fcmp_int);
+    List_Insert((*ppg)->Entities, &Elementary, fcmp_int);
   }
   else {
     List_T *tmp = List_Create(1, 1, sizeof(int));