tests.lisp
Fri Nov 13 05:19:55 UTC 2009 pix@kepibu.org
* Time-based checkin
Renames some things, but mostly just doing this because it's a good time too.
--- old-Oh, Ducks!/tests.lisp 2015-10-22 02:04:18.000000000 +0000
+++ new-Oh, Ducks!/tests.lisp 2015-10-22 02:04:19.000000000 +0000
@@ -1,8 +1,8 @@
(in-package #:css-selector-unifier)
-(equalp '(:div ((:id "id")) "I " (:i () "like") " cheese.")
- (match (#T(lhtml ("#id" . ?div))
- "<div id=\"id\">I <i>like</i> cheese.</div>")
+(equalp '(:div ((:element-id "element-id")) "I " (:i () "like") " cheese.")
+ (match (#T(lhtml ("#element-id" . ?div))
+ "<div element-id=\"element-id\">I <i>like</i> cheese.</div>")
;; FIXME: learn to distinguish between when there should only be one
;; result and when there should be many?
(car div)))