diff --git a/predicates.rkt b/predicates.rkt
index e1b6e5d..a233058 100644
--- a/predicates.rkt
+++ b/predicates.rkt
@@ -179,12 +179,12 @@
 (define/contract (pmap-attr? x)
   (any/c . -> . boolean?)
   (match x
-    [(list `(parent ,(? string?))) #t]
+    [(list `(,POLLEN_MAP_PARENT_KEY ,(? string?))) #t]
     [else #f]))
 
 (module+ test
-  (check-true (pmap-attr? '((parent "bar"))))
-  (check-false (pmap-attr? '((parent "bar")(foo "bar"))))
+  (check-true (pmap-attr? `((,POLLEN_MAP_PARENT_KEY "bar"))))
+  (check-false (pmap-attr? `((,POLLEN_MAP_PARENT_KEY "bar")(foo "bar"))))
   (check-false (pmap-attr? '())))