move XHTML stuff from responses.scm to htmlout.scm, adapt
packages.scm
This commit is contained in:
parent
a9ae5061d0
commit
c089e26e96
|
@ -29,7 +29,10 @@
|
||||||
with-tag*
|
with-tag*
|
||||||
|
|
||||||
escape-html
|
escape-html
|
||||||
emit-text))
|
emit-text
|
||||||
|
|
||||||
|
emit-prolog
|
||||||
|
xmlnsdecl-attr))
|
||||||
|
|
||||||
(define-interface smtp-interface
|
(define-interface smtp-interface
|
||||||
(export smtp-send-mail
|
(export smtp-send-mail
|
||||||
|
@ -721,7 +724,8 @@
|
||||||
(define-structure httpd-responses httpd-responses-interface
|
(define-structure httpd-responses httpd-responses-interface
|
||||||
(open scheme
|
(open scheme
|
||||||
(subset scsh (format-date write-string time date))
|
(subset scsh (format-date write-string time date))
|
||||||
url ;http-url->string
|
url
|
||||||
|
htmlout
|
||||||
syslog
|
syslog
|
||||||
define-record-types
|
define-record-types
|
||||||
finite-types
|
finite-types
|
||||||
|
|
Loading…
Reference in New Issue