diff --git a/mystic/mutil_echoimport.pas b/mystic/mutil_echoimport.pas
index f2f3c5e..9709368 100644
--- a/mystic/mutil_echoimport.pas
+++ b/mystic/mutil_echoimport.pas
@@ -117,7 +117,7 @@ Var
         // areafix etc here
 
         If GetMBaseByNetZone (PKT.PKTHeader.DestZone, MBase) Then Begin
-          For Count := 1 to 50 Do
+          For Count := 1 to ForwardSize Do
             If strUpper(strWordGet(1, ForwardList[Count], ';')) = strUpper(PKT.MsgTo) Then
               PKT.MsgTo := strWordGet(2, ForwardList[Count], ';');
 
@@ -418,4 +418,4 @@ Begin
   ProcessResult (rDONE, True);
  End;
 
-End.
\ No newline at end of file
+End.