From 62d62e59d7aab611dc8a5b24c875d1fd4b62a68a Mon Sep 17 00:00:00 2001 From: norayr Date: Sat, 15 Apr 2017 00:37:20 +0400 Subject: [PATCH] idontknow --- IRC.Mod | 1 + test.Mod | 1 + 2 files changed, 2 insertions(+) diff --git a/IRC.Mod b/IRC.Mod index 841be96..b03f4ac 100644 --- a/IRC.Mod +++ b/IRC.Mod @@ -241,6 +241,7 @@ VAR BEGIN formJoinLine(str, inst.channelList^[0]); b := Send(inst, str); + (*b := Internet.Write(inst.connection, str);*) END Join; PROCEDURE processResponse(VAR inst: instance; VAR line: ARRAY OF CHAR): BOOLEAN; diff --git a/test.Mod b/test.Mod index 8c4853b..2a31e93 100644 --- a/test.Mod +++ b/test.Mod @@ -32,6 +32,7 @@ BEGIN IF IRC.Connect(inst) # FALSE THEN b := IRC.Auth(inst); + IRC.Loop(inst); END; END testBot;