diff --git a/collects/mzlib/pconvert.ss b/collects/mzlib/pconvert.ss
index bf29dee7b5..d8b9d23aaa 100644
--- a/collects/mzlib/pconvert.ss
+++ b/collects/mzlib/pconvert.ss
@@ -363,6 +363,7 @@
                                                           `(,(recur k) ,(recur v)))))]
                                [(vector? expr) `(vector ,@(map recur (vector->list expr)))]
                                [(symbol? expr) `',expr]
+                               [(keyword? expr) `',expr]
                                [(string? expr) expr]
                                [(primitive? expr) (object-name expr)]
                                [(procedure? expr)