Error when unable to parse CSS selector
Mon Nov 23 13:14:00 UTC 2009 pix@kepibu.org
* Error when unable to parse CSS selector
diff -rN -u old-Oh, Ducks!/notes new-Oh, Ducks!/notes
--- old-Oh, Ducks!/notes 2015-11-18 20:18:08.000000000 +0000
+++ new-Oh, Ducks!/notes 2015-11-18 20:18:08.000000000 +0000
@@ -110,7 +110,6 @@
I also recommend submitting a patch. Other people might want to use
that selector, too!
* Known Bugs
-** Does not error on unknown CSS selectors
** Failure to match results in NIL, rather than a unification-failure
* To Do
** working lhtml/xmls support [1/2]
diff -rN -u old-Oh, Ducks!/selectors.lisp new-Oh, Ducks!/selectors.lisp
--- old-Oh, Ducks!/selectors.lisp 2015-11-18 20:18:08.000000000 +0000
+++ new-Oh, Ducks!/selectors.lisp 2015-11-18 20:18:08.000000000 +0000
@@ -64,7 +64,9 @@
(#T(regexp$ "(\\w+)" (?type))
(cons (make-instance 'type-selector :arg type) (parse-selector &rest)))
(#T(regexp$ "\\*" ())
- (cons (make-instance 'universal-selector) (parse-selector &rest)))))
+ (cons (make-instance 'universal-selector) (parse-selector &rest)))
+ (t (unless (string= selector "")
+ (error "Unable to to parse selector: ~s" selector)))))
(defgeneric find-matching-elements (selector element)
(:method (selector (element t))