diff --git a/wst/trunk/ws_helper/ws_helper_prog.inc b/wst/trunk/ws_helper/ws_helper_prog.inc
index d5cfda2d0..473d48907 100644
--- a/wst/trunk/ws_helper/ws_helper_prog.inc
+++ b/wst/trunk/ws_helper/ws_helper_prog.inc
@@ -207,7 +207,7 @@ var
   var
     namesSpecif, strBuffer, oldName, newName : string;
     k : Integer;
-    mdlList : TList; 
+    mdlList : TList2;
     mdl : TPasModule;
     found : Boolean;
   begin