diff options
| author | Boutade <thegoofist@protonmail.com> | 2019-09-25 22:33:29 -0500 |
|---|---|---|
| committer | Boutade <thegoofist@protonmail.com> | 2019-09-25 22:33:29 -0500 |
| commit | 61d66a9cd09ad3c01f97f2fc5abc98505258eb9c (patch) | |
| tree | 12d41acb9313ea939c6c0be32f55366920583d22 /examples/shell-echo-bot.lisp | |
| parent | 273bc8acf9cc5319062124072a3e568d34efa284 (diff) | |
integrated server-directory component into example bot
Diffstat (limited to 'examples/shell-echo-bot.lisp')
| -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* |