remove an assignment that doesn't serve any usefull function and causes
[lcore.git] / lsocket.pas
index ce2330174dd6c46e9e82f015ae310be4fc03dfc9..ddee93e8ac7d094347134b39774f66be5389d3c4 100755 (executable)
@@ -260,7 +260,6 @@ begin
   currentip := 0;\r
   if not assigned(connecttimeout) then begin\r
     connecttimeout := tltimer.create(self);\r
   currentip := 0;\r
   if not assigned(connecttimeout) then begin\r
     connecttimeout := tltimer.create(self);\r
-    connecttimeout.Tag := integer(self);\r
     connecttimeout.ontimer := connecttimeouthandler;\r
     connecttimeout.interval := 2500;\r
     connecttimeout.enabled := false;\r
     connecttimeout.ontimer := connecttimeouthandler;\r
     connecttimeout.interval := 2500;\r
     connecttimeout.enabled := false;\r