From 61d66a9cd09ad3c01f97f2fc5abc98505258eb9c Mon Sep 17 00:00:00 2001 From: Boutade Date: Wed, 25 Sep 2019 22:33:29 -0500 Subject: integrated server-directory component into example bot --- examples/shell-echo-bot.lisp | 7 +++++-- 1 file changed, 5 insertions(+), 2 deletions(-) (limited to 'examples/shell-echo-bot.lisp') diff --git a/examples/shell-echo-bot.lisp b/examples/shell-echo-bot.lisp index a73a174..2e4167c 100644 --- a/examples/shell-echo-bot.lisp +++ b/examples/shell-echo-bot.lisp @@ -1,5 +1,8 @@ -(defclass shell-echo-bot (granolin:client granolin::message-log) ()) +(defclass shell-echo-bot (granolin:client + granolin:message-log + granolin:server-directory) + ()) (defvar *bot* (make-instance 'shell-echo-bot @@ -11,7 +14,7 @@ ;; a script to login if necessary, and then start the bot -(unless (granolin:logged-in-p *bot*) +(unless (granolin:logged-in-p *bot*) (princ "Log in to the server:") (terpri) (granolin:login *bot* -- cgit v1.2.3