remove an assignment that doesn't serve any usefull function and causes
authorplugwash <plugwash@p10link.net>
Mon, 13 Apr 2009 02:44:32 +0000 (02:44 +0000)
committerplugwash <plugwash@p10link.net>
Mon, 13 Apr 2009 02:44:32 +0000 (02:44 +0000)
build failure with 2.0.0 on amd64

git-svn-id: file:///svnroot/lcore/trunk@47 b1de8a11-f9be-4011-bde0-cc7ace90066a

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
-    connecttimeout.Tag := integer(self);\r
     connecttimeout.ontimer := connecttimeouthandler;\r
     connecttimeout.interval := 2500;\r
     connecttimeout.enabled := false;\r