Ignore data messages in init mode. Handle simple-stream-error.

[eow] / package.lisp

diff --git a/package.lisp b/package.lisp
index 5ba1030c80e277d95f858f7df7f32e1d2f252e6c..f7a01797d141f1e53670dfea8507ba9f0385a4f5 100644 (file)
--- a/package.lisp
+++ b/package.lisp
@@ -14,7 +14,7 @@
             :command))
   (defpackage :locked-queue
     (:use :cl :sb-thread)
-    (:export :create :enqueue :dequeue))
+    (:export :create :enqueue :dequeue :dequeue-all))
   (defpackage :empire-web
     (:use :cl)
     (:export :start :send :prompt :data))