diff --git a/scsh/thttpd/thttpdaemon.scm b/scsh/thttpd/thttpdaemon.scm index 540ea2c..b7e2538 100644 --- a/scsh/thttpd/thttpdaemon.scm +++ b/scsh/thttpd/thttpdaemon.scm @@ -91,7 +91,6 @@ (let ((response-word-2nd (get-response abcl))) (if (symbol? response-word-2nd) (begin - (write "Hello World") ;;(display "200 OK" out) (display aspect-content out) (display (string #\return #\newline) out) ;; CRLF