deep-tag-with-attr ( tag attr-value attr-name -- matching-tag )

Vocabulary

xml.traversal

Inputs

tag	an object
attr-value	an object
attr-name	an object

Outputs

matching-tag

an object

Definition

USING: kernel sequences.deep xml.data ;

IN: xml.traversal

: deep-tag-with-attr
    ( tag attr-value attr-name -- matching-tag )
    assure-name [ tag-with-attr? ] 2curry deep-find ;