scsh-conservatory
/
sunterlib
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

thttpd - web daemon software - fixes 5

This commit is contained in:
erana 2012-01-23 13:56:40 +09:00
parent 445f12c48b
commit c38832ae2a
1 changed files with 0 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
scsh/thttpd/thttpdaemon.scm
View File

@ -91,7 +91,6 @@
(let ((response-word-2nd (get-response abcl))) (let ((response-word-2nd (get-response abcl)))
(if (symbol? response-word-2nd) (if (symbol? response-word-2nd)
(begin (begin
(write "Hello World")
;;(display "200 OK" out) ;;(display "200 OK" out)
(display aspect-content out) (display aspect-content out)
(display (string #\return #\newline) out) ;; CRLF (display (string #\return #\newline) out) ;; CRLF