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;