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