X-Git-Url: https://jxself.org/git/?p=8sync.git;a=blobdiff_plain;f=demos%2Fircbot.scm;fp=demos%2Fircbot.scm;h=c1c573e08ac24983ddda378c9cde95fc08605633;hp=1c4ae748e0704192a2a4bb0e02be8e111c0d2dc6;hb=063be529581b7004dae5ecb106bcf33729b9fef7;hpb=61fed4138184d12cfcdca93035492119999dfa48 diff --git a/demos/ircbot.scm b/demos/ircbot.scm index 1c4ae74..c1c573e 100755 --- a/demos/ircbot.scm +++ b/demos/ircbot.scm @@ -104,17 +104,17 @@ (repl #f)) (define hive (make-hive)) (define irc-bot - (hive-create-actor* hive "irc-bot" - #:username username - #:server server - #:channels channels)) + (bootstrap-actor* hive "irc-bot" + #:username username + #:server server + #:channels channels)) (define repl-manager (cond ((string? repl) - (hive-create-actor* hive "repl" - #:path repl)) + (bootstrap-actor* hive "repl" + #:path repl)) (repl - (hive-create-actor* hive "repl")))) + (bootstrap-actor* hive "repl")))) (define initial-messages (if repl