Wed Feb 10 08:50:16 UTC 2010  pix@kepibu.org
  * Add attribute-equal selector
--- old-Oh, Ducks!/tests.lisp	2015-10-29 09:37:01.000000000 +0000
+++ new-Oh, Ducks!/tests.lisp	2015-10-29 09:37:01.000000000 +0000
@@ -157,6 +157,12 @@
          "<div><i id=''>blank id</i>foo<b>no id</b>bar<i id='id'>id id</i></div>")
    ids))
 
+(serialize-values
+ (match (#T(html (:model dom)
+                 ("[id=foo]" . ?id))
+         "<div><i id='bar'>bar id</i><i>no id</i><i id='foo'>foo id</i></div>")
+   id))
+
 #+LATER?
 (match (#t(html ("div::content" . #t(regexp+ "^f(o+)" (?o))))
         "<div>barbaz</div><div>fooooooobar</div>")