mirror of
https://github.com/vishapoberon/vipak.git
synced 2026-04-06 04:52:26 +00:00
hid doLog and introduced a settes for that.
This commit is contained in:
parent
02f36bcf1a
commit
f2d06dd9a5
2 changed files with 8 additions and 2 deletions
3
test.Mod
3
test.Mod
|
|
@ -40,6 +40,7 @@ BEGIN
|
|||
Out.String("recipient: '"); Out.String(rcpt); Out.Char("'"); Out.Ln;
|
||||
Out.String("host: '"); Out.String(host); Out.Char("'"); Out.Ln;
|
||||
Out.String("*** that's it ***"); Out.Ln;
|
||||
IF msgtype # IRC.msgJOIN THEN IRC.sendMsgToDst(inst, rcpt, "test back") END;
|
||||
END onPublicMessage;
|
||||
|
||||
PROCEDURE onPublicMessageWithMention(VAR msg, msgtype, user, ident, rcpt, host: ARRAY OF CHAR);
|
||||
|
|
@ -76,7 +77,7 @@ BEGIN
|
|||
NEW(channels, 2);
|
||||
channels[0].channel := "#oberon-test";
|
||||
channels[1].channel := "#pascal-test";
|
||||
inst.doLog := TRUE;
|
||||
IRC.setLogging(inst, TRUE);
|
||||
IRC.initChannelList(inst, channels);
|
||||
|
||||
Platform.SetInterruptHandler(interrupt);
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue