visible-dirs ( root entries -- entries )

Vocabulary

vocabs.hierarchy.private

Inputs

root	an object
entries	an object

Outputs

entries

an object

Definition

USING: accessors io.directories sequences sorting ;

IN: vocabs.hierarchy.private

: visible-dirs ( root entries -- entries )
    [ [ visible-dir? ] filter [ name>> ] sort-by ]
    with-directory ;