我有一个类似于HTML代码段:
<div id="root"> <div id="A" attrib_2="bar"></div> <div id="B" attrib_2="baz"> <div id="H" attrib_1="gnu"> <p> <div id="F" attrib_2="baz"></div> </p> </div> </div> <div id="C" attrib_2="owl"></div> <div id="D" attrib_2="uhu"></div> <div id="E" attrib_2="boom"></div> </div>
现在,我想选择所有具有attrib_2(* [attrb_2])的片段,不包括具有attrib_1集合的节点的下降点.可以有更多的嵌套级别与任意标签(如本例中的< p>).有了Enlive(http://enlive.cgrand.net/),我已经尝试过如下:
(select snippet [(but (attr? :attrib_1)) (attr? :attrib_2)])
但是这不行,因为否定(但是(attr?:attrib_1))也匹配< p>标签.有没有办法用给定的选择器谓词(http://enlive.cgrand.net/syntax.html)表达这一点,还是要写自己的?
提前致谢
-Jochen
解决方法
你必须编写自己的选择器:
(def parents (zip-pred (fn [loc pred] (some pred (take-while identity (iterate zip/up loc))))))
(另)
接着
(select snippet [[(attr? :attrib_2) (but (parents (attr? :attrib_1))]])
应该工作