From cddffced5f2bc46b9a352ece7aa7618eca6b693e Mon Sep 17 00:00:00 2001
From: Boutade <thegoofist@protonmail.com>
Date: Wed, 25 Sep 2019 21:12:14 -0500
Subject: added initial server-directory utility class

---
 examples/shell-echo-bot.lisp | 4 ++--
 1 file changed, 2 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 6cd9f1b..a73a174 100644
--- a/examples/shell-echo-bot.lisp
+++ b/examples/shell-echo-bot.lisp
@@ -11,7 +11,7 @@
 
 ;; a script to login if necessary, and then start the bot
 
-(unless (access-token *bot*) 
+(unless (granolin:logged-in-p *bot*) 
   (princ "Log in to the server:")
   (terpri)
   (granolin:login *bot*
@@ -19,4 +19,4 @@
                   (and (princ "password: ") (read-line))))
 
 
-(start *bot*)
+(granolin:start *bot*)
-- 
cgit v1.2.3