|
|
|
@ -176,6 +176,6 @@ version print the version" (current-server-port) (make-publish-di
|
|
|
|
(displayln (let ([responses '("Cursing at free software? Really?" "How uncouth." "Same to you, buddy.")])
|
|
|
|
(displayln (let ([responses '("Cursing at free software? Really?" "How uncouth." "Same to you, buddy.")])
|
|
|
|
(list-ref responses (random (length responses)))))
|
|
|
|
(list-ref responses (random (length responses)))))
|
|
|
|
(begin
|
|
|
|
(begin
|
|
|
|
(displayln (format "`~a` is an unknown command. Please try one of the following." command))
|
|
|
|
(displayln (format "`~a` is an unknown command." command))
|
|
|
|
(displayln "")
|
|
|
|
(display "These are the available ") ; ... "Pollen commands:"
|
|
|
|
(handle-help))))
|
|
|
|
(handle-help))))
|
|
|
|
|
