diff --git a/pollen/decode.rkt b/pollen/decode.rkt
index ee88ed5..ef73b37 100644
--- a/pollen/decode.rkt
+++ b/pollen/decode.rkt
@@ -52,7 +52,7 @@
     (cond
       [(txexpr? x) (let-values([(tag attrs elements) (txexpr->values x)]) 
                      (if (or (memq tag excluded-tags) (for/or ([attr (in-list attrs)])
-                                                          (memq attr excluded-attrs))) 
+                                                          (member attr excluded-attrs))) 
                          x ; because it's excluded
                          ;; we apply processing here rather than do recursive descent on the pieces
                          ;; because if we send them back through loop, certain element types are ambiguous
diff --git a/pollen/private/ts.rktd b/pollen/private/ts.rktd
index 961a438..3e1800a 100644
--- a/pollen/private/ts.rktd
+++ b/pollen/private/ts.rktd
@@ -1 +1 @@
-1515628033
+1515713303