directory>certs ( path -- assoc )

Vocabulary

certs

Inputs

path

an object

Outputs

assoc

an object

Definition

USING: assocs io.directories io.encodings.utf8 io.files ;

IN: certs

: directory>certs ( path -- assoc )
    [ "." directory-files [ utf8 file-contents ] zip-with ]
    with-directory ;