aws-hidden-files ( -- assoc )

Vocabulary

aws

Inputs

None

Outputs

assoc

an object

Definition

USING: assocs io.directories io.encodings.utf8 io.files
io.files.info io.pathnames kernel sequences ;

IN: aws

: aws-hidden-files ( -- assoc )
    home ".aws" append-path recursive-directory-files
    [ directory? ] reject
    [ [ utf8 file-contents ] keep parse-by-filename ] zip-with
    [ dup ".aws" swap subseq-start tail ] map-keys ;