html.streams: fix typo in stack effect for emit-html.
parent
c4fa0c2507
commit
9edab21aeb
|
@ -73,7 +73,7 @@ MACRO: make-css ( pairs -- str )
|
||||||
span-css-style
|
span-css-style
|
||||||
[ swap [XML <span style=<->><-></span> XML] ] unless-empty ; inline
|
[ swap [XML <span style=<->><-></span> XML] ] unless-empty ; inline
|
||||||
|
|
||||||
: emit-html ( quot stream -- )
|
: emit-html ( stream quot -- )
|
||||||
dip data>> push ; inline
|
dip data>> push ; inline
|
||||||
|
|
||||||
: image-path ( path -- images-path )
|
: image-path ( path -- images-path )
|
||||||
|
|
Loading…
Reference in New Issue