Merge branch 'master' of git://factorcode.org/git/jamesnvc

[factor.git] / basis / validators / validators.factor

diff --git a/basis/validators/validators.factor b/basis/validators/validators.factor
index a70e20d7b6c7b28d112dcd4972986d3493705fde..04c85cd6db602fc48ebdad30602c7b534ff249d8 100644 (file)
--- a/basis/validators/validators.factor
+++ b/basis/validators/validators.factor
@@ -5,6 +5,9 @@ math.parser math.ranges assocs regexp unicode.categories arrays
 hashtables words classes quotations xmode.catalog ;
 IN: validators
 
+: v-checkbox ( str -- ? )
+    "on" = ;
+
 : v-default ( str def -- str/def )
     over empty? spin ? ;