diff options
Diffstat (limited to 'examples')
| -rw-r--r-- | examples/shell-echo-bot.lisp | 7 |
1 files changed, 5 insertions, 2 deletions
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* |