X-Git-Url: https://jxself.org/git/?p=8sync.git;a=blobdiff_plain;f=demos%2Fircbot.scm;fp=demos%2Fircbot.scm;h=48fc6b7ac7a6ba5d76d08ca4dd8e7f51b80bb271;hp=bfcd723fca8f9722b014192c75d48e366dd35748;hb=165231476f466b4dbeca51c981cf0dfa2963ff16;hpb=bc24c9f3f29d3396ae9e52f9682914dec868838a diff --git a/demos/ircbot.scm b/demos/ircbot.scm index bfcd723..48fc6b7 100755 --- a/demos/ircbot.scm +++ b/demos/ircbot.scm @@ -28,8 +28,8 @@ (define-class ()) -(define-method (irc-bot-handle-line (irc-bot ) speaker channel - line emote?) +(define-method (handle-line (irc-bot ) speaker channel + line emote?) (define my-name (irc-bot-username irc-bot)) (define (looks-like-me? str) (or (equal? str my-name)