(format log "handle-data ~a~%" message)
(empire-web:data (session c) message)))
+(defmethod handle-flush ((m play-mode) message)
+ (let* ((c (connection m))
+ (log (logging-stream c)))
+ (format log "handle-flush ~a~%" message)
+ (empire-web:data (session c) message)))
+
(defmethod handle-prompt ((m play-mode) message)
(let* ((c (connection m))
(log (logging-stream c)))