Merge pull request #111 from basus/master

More helpful message for unknown commands

pollen/private/command.rkt

@@ -175,4 +175,7 @@ version                print the version" (current-server-port) (make-publish-di
   (if (regexp-match #rx"(shit|fuck)" command)
       (displayln (let ([responses '("Cursing at free software? Really?" "How uncouth." "Same to you, buddy.")])
                    (list-ref responses (random (length responses)))))
-      (displayln (format "unknown command ~a" command))))
+      (begin
+        (displayln (format "`~a` is an unknown command. Please try one of the following." command))
+        (displayln "")
+        (handle-help))))