steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Minor fixes for xml entities and interpolate

db4
Daniel Ehrenberg 2009-01-26 21:39:08 -06:00
parent 73f30edb29
commit 9efe8fa520
2 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
basis/xml/entities/entities.factor
View File

@ -16,6 +16,7 @@ IN: xml.entities
{ CHAR: & "&" } { CHAR: & "&" }
{ CHAR: ' "'" } { CHAR: ' "'" }
{ CHAR: " """ } { CHAR: " """ }
{ CHAR: < "&lt;" }
} ; } ;
: escape-string-by ( str table -- escaped ) : escape-string-by ( str table -- escaped )

2
basis/xml/interpolate/interpolate.factor
View File

@ -90,7 +90,7 @@ MACRO: interpolate-chunk ( string -- chunk )
: parse-def ( accum delimiter word -- accum ) : parse-def ( accum delimiter word -- accum )
[ [
parse-multiline-string parse-multiline-string but-last
[ string>chunk extract-variables collect ] keep [ string>chunk extract-variables collect ] keep
parsed parsed
] dip parsed ; ] dip parsed ;