(keys) ( xml -- seq )

Vocabulary

s3.private

Inputs

xml

an object

Outputs

seq

an object

Definition

USING: kernel s3 sequences xml.traversal ;

IN: s3.private

: (keys) ( xml -- seq )
    "Contents" tags-named [
        [ "Key" tag-named children>string ]
        [ "LastModified" tag-named children>string ]
        [ "Size" tag-named children>string ] tri key boa
    ] map ;