Use <pre> tags

db4
Slava Pestov 2008-04-15 06:19:39 -05:00
parent 7bcadd99a4
commit cd0b715161
1 changed files with 2 additions and 1 deletions

View File

@ -55,7 +55,8 @@ MEMO: eq ( -- parser )
: render-code ( string mode -- string' )
>r string-lines r>
[ [ htmlize-lines ] with-html-stream ] with-string-writer ;
[ [ htmlize-lines ] with-html-stream ] with-string-writer
"pre" surround-with-foo ;
: escape-link ( href text -- href-esc text-esc )
>r escape-quoted-string r> escape-string ;