file>html ( name infos -- xml )

Vocabulary

http.server.static

Inputs

name	an object
infos	an object

Outputs

xml

an object

Definition

USING: accessors io.files.info kernel math.parser sequences ;

IN: http.server.static

: file>html ( name infos -- xml )
    [
        dup directory?
        [ drop "/" append "-" ] [ size>> number>string ] if
    ] [ modified>> ] bi file-html-template ;