diff --git a/basis/html/streams/streams.factor b/basis/html/streams/streams.factor index 82f87f4f87..abe507c5d9 100644 --- a/basis/html/streams/streams.factor +++ b/basis/html/streams/streams.factor @@ -77,11 +77,11 @@ MACRO: make-css ( pairs -- str ) : emit-html ( stream quot -- ) dip data>> push ; inline -: image-path ( path -- images-path ) +: icon-path ( path -- icons-path ) "vocab:definitions/icons/" ?head [ "/icons/" prepend ] when ; : img-tag ( xml style -- xml ) - image of [ nip image-path simple-image ] when* ; + image of [ nip icon-path simple-image ] when* ; : format-html-span ( string style stream -- ) [