diff --git a/crossfire/client.rkt b/crossfire/client.rkt
index 6f83a3d..5c50597 100644
--- a/crossfire/client.rkt
+++ b/crossfire/client.rkt
@@ -171,6 +171,8 @@
 
 
 (define (cmd-status)
+  (define (fmt-list lst)
+    (if (empty? lst) "none" (~a lst)))
   (define projects
     (with-server-connection
       (get-projects)))
@@ -180,7 +182,7 @@
                             (project-info-name proj)
                             (format "~a%" (inexact->exact (* 100 (project-info-progress proj))))
                             (~a (project-info-matches proj))
-                            (~a (project-info-agent-state proj))))])
+                            (fmt-list (project-info-agent-state proj))))])
           (if (empty? body)
             '(("" " - no projects - " "" "" ""))
             body))))