move XHTML stuff from responses.scm to htmlout.scm, adapt

packages.scm

scheme/packages.scm

@@ -29,7 +29,10 @@
 	  with-tag*
 
 	  escape-html
-	  emit-text))
+	  emit-text
+
+	  emit-prolog
+	  xmlnsdecl-attr))
 
 (define-interface smtp-interface
   (export smtp-send-mail
@@ -721,7 +724,8 @@
 (define-structure httpd-responses httpd-responses-interface
   (open scheme
 	(subset scsh (format-date write-string time date))
-	url ;http-url->string
+	url
+	htmlout 
 	syslog
 	define-record-types
 	finite-types