Fixes to v-checkbox

db4
James Cash 2009-01-13 22:58:39 -05:00
parent 585d977ed0
commit 65b1a62f6a
2 changed files with 3 additions and 3 deletions

View File

@ -3,7 +3,7 @@ strings math regexp regexp.backend ;
IN: validators IN: validators
HELP: v-checkbox HELP: v-checkbox
{ $values { "str" string } } { $values { "str" string } { "?" "a boolean" } }
{ $description "Converts the string value of a checkbox component (either \"on\" or \"off\") to a boolean value." } ; { $description "Converts the string value of a checkbox component (either \"on\" or \"off\") to a boolean value." } ;
HELP: v-captcha HELP: v-captcha

View File

@ -2,11 +2,11 @@
! See http://factorcode.org/license.txt for BSD license. ! See http://factorcode.org/license.txt for BSD license.
USING: kernel continuations sequences math namespaces make sets USING: kernel continuations sequences math namespaces make sets
math.parser math.ranges assocs regexp unicode.categories arrays math.parser math.ranges assocs regexp unicode.categories arrays
hashtables words classes quotations xmode.catalog ; hashtables words classes quotations xmode.catalog unicode.case ;
IN: validators IN: validators
: v-checkbox ( str -- ? ) : v-checkbox ( str -- ? )
"on" = ; >lower "on" = ;
: v-default ( str def -- str/def ) : v-default ( str def -- str/def )
over empty? spin ? ; over empty? spin ? ;