(defn attr "Returns the xml attribute named attrname, of the xml node at location loc." ([attrname] (fn [loc] (attr loc attrname))) ([loc attrname] (when (zip/branch? loc) (-> loc zip/node :attrs attrname))))
Comments top
No comments for attr. Log in to add a comment.