relevant-rules ( robots -- rules )

Vocabulary

robots.private

Inputs

robots

an object

Outputs

rules

an object

Definition

USING: accessors globs kernel namespaces robots sequences ;

IN: robots.private

: relevant-rules ( robots -- rules )
    [
        user-agents>> [
            robot-identities get [ swap glob-matches? ] with
            any?
        ] any?
    ] filter ;