zipplet: fix range check exception in fpc 3 on tcp connect

[lcore.git] / lcoregtklaz.pas

diff --git a/lcoregtklaz.pas b/lcoregtklaz.pas
old mode 100755 (executable)
new mode 100644 (file)
index b09dbfc..6473784
--- a/lcoregtklaz.pas
+++ b/lcoregtklaz.pas
@@ -33,7 +33,7 @@ implementation
     ExtCtrls;\r
 {$I unixstuff.inc}\r
 var\r
-  giochannels : array[0..absoloutemaxs] of pgiochannel;\r
+  giochannels : array[0..absolutemaxs] of pgiochannel;\r
 \r
 function iocallback(source:PGIOChannel; condition:TGIOCondition; data:gpointer):gboolean;cdecl;\r
 // return true if we want the callback to stay\r