From bbe279b8255816e58719d101c083c2c7a3600a83 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Ekaitz=20Z=C3=A1rraga?= Date: Wed, 30 Oct 2019 10:15:52 +0100 Subject: [PATCH] Update sxml docs --- lib/chibi/sxml.scm | 2 ++ 1 file changed, 2 insertions(+) diff --git a/lib/chibi/sxml.scm b/lib/chibi/sxml.scm index 7add54dd..af3af40d 100644 --- a/lib/chibi/sxml.scm +++ b/lib/chibi/sxml.scm @@ -78,6 +78,7 @@ (lambda (out) (html-display-escaped-string str out)))) ;;> Render (valid, expanded) \var{sxml} as html. +;;> \var{@raw} tag is considered safe text and not processed or escaped. (define (sxml-display-as-html sxml . o) (let ((out (if (pair? o) (car o) (current-output-port)))) (let lp ((sxml sxml)) @@ -105,6 +106,7 @@ (else (html-display-escaped-string sxml out)))))) ;;> Render \var{sxml} as \var{xml}. +;;> \var{@raw} tag is considered safe text and not processed or escaped. (define (sxml->xml sxml) (call-with-output-string (lambda (out) (sxml-display-as-html sxml out))))