find-repos-by-visibility ( seq quot: ( name -- ? ) -- seq' )

Vocabulary

github

Inputs

seq	an object
quot	a quotation with stack effect ( name -- ? )

Outputs

seq'

an object

Definition

USING: assocs kernel sequences ;

IN: github

: find-repos-by-visibility
    ( seq quot: ( name -- ? ) -- seq' )
    [ [ "visibility" of ] ] dip compose filter ; inline