From c38832ae2a2111c5d40b3607520bdd51c11b8114 Mon Sep 17 00:00:00 2001 From: erana Date: Mon, 23 Jan 2012 13:56:40 +0900 Subject: [PATCH] thttpd - web daemon software - fixes 5 --- scsh/thttpd/thttpdaemon.scm | 1 - 1 file changed, 1 deletion(-) 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