]> gitweb.factorcode.org Git - factor.git/blobdiff - basis/html/forms/forms-tests.factor
Revert "factor: rename [ ] [ ] unit-test -> { } [ ] unit-test using a refactoring...
[factor.git] / basis / html / forms / forms-tests.factor
index 9be0b2cec2097a6e19e5724b0e08de925fba0762..d311e57bab1bdafceba37d7219fadd066657c993 100644 (file)
@@ -9,13 +9,13 @@ IN: html.forms.tests
         call
     ] with-scope ; inline
 
-{ 14 } [
+[ 14 ] [
     [
         "14" [ v-number 13 v-min-value 100 v-max-value ] validate
     ] with-validation
 ] unit-test
 
-{ t } [
+[ t ] [
     [
         "140" [ v-number 13 v-min-value 100 v-max-value ] validate
         [ validation-error-state? ]
@@ -31,7 +31,7 @@ person {
     { "age" [ v-number 13 v-min-value 100 v-max-value ] }
 } define-validators
 
-{ t t } [
+[ t t ] [
     [
         { { "age" "" } }
         { { "age" [ v-required ] } }
@@ -44,7 +44,7 @@ person {
     ] with-validation
 ] unit-test
 
-{ H{ { "a" 123 } } f } [
+[ H{ { "a" 123 } } f ] [
     [
         H{
             { "a" "123" }
@@ -59,7 +59,7 @@ person {
     ] with-validation
 ] unit-test
 
-{ t "foo" } [
+[ t "foo" ] [
     [
         "foo" validation-error
         validation-failed?