handle-flush in play-mode

[eow] / package.lisp

diff --git a/package.lisp b/package.lisp
index 5cf8ad0cf40d6a31ad1cd51392dd4c5cea099e0c..a8e00266d080bdcb1c3400390fd3e878182b5691 100644 (file)
--- a/package.lisp
+++ b/package.lisp
@@ -8,8 +8,7 @@
 (eval-when (:execute :load-toplevel :compile-toplevel)
   (defpackage :empire
       (:use :cl)
-    (:export :read-message-loop
-             :read-message
+    (:export :session
             :make-connection
             :connect
             :send-message))
@@ -19,4 +18,3 @@
   (defpackage :empire-web
     (:use :cl :hunchentoot)
     (:export :start :send :prompt :data)))
-