diff --git a/scsh/lib/cset-package.scm b/scsh/lib/cset-package.scm
index 28812c0..0b0dcd7 100644
--- a/scsh/lib/cset-package.scm
+++ b/scsh/lib/cset-package.scm
@@ -62,7 +62,7 @@
 
 	  (char-set-size (proc (:value) :exact-integer))
 	  (char-set-count (proc ((proc (:char) :boolean) :value) :exact-integer))
-	  (char-set-contains? (proc (:char :value) :boolean))
+	  (char-set-contains? (proc (:value :value) :boolean))
 
 	  (char-set-every (proc ((proc (:char) :boolean) :value) :boolean))
 	  (char-set-any (proc ((proc (:char) :boolean) :value) :value))