diff --git a/scheme/httpd/cgi-server.scm b/scheme/httpd/cgi-server.scm
index a4a435a..aa7971f 100644
--- a/scheme/httpd/cgi-server.scm
+++ b/scheme/httpd/cgi-server.scm
@@ -133,7 +133,7 @@
 	       (cgi-make-response (run/port* doit) path req)))))
        
        ((string=? request-method "HEAD")
-	    (make-error-response (status-code method-not-allowed) req (list "GET" "POST")))
+	    (make-error-response (status-code method-not-allowed) req "GET, POST"))
        
        (else
 	(make-error-response (status-code not-implemented) req))))))