factor: rename [ ] [ ] unit-test -> { } [ ] unit-test using a refactoring tool!

[factor.git] / basis / ui / gadgets / tables / tables-tests.factor

diff --git a/basis/ui/gadgets/tables/tables-tests.factor b/basis/ui/gadgets/tables/tables-tests.factor
index b92f72a2dd97327709a933a4337b98bf1cfa18b0..cef352b3d0bd19b4280f2605cf7394826b229575 100644 (file)
--- a/basis/ui/gadgets/tables/tables-tests.factor
+++ b/basis/ui/gadgets/tables/tables-tests.factor
@@ -15,15 +15,15 @@ M: test-renderer column-titles drop { "First" "Last" } ;
         { "Don" "Stewart" }
     } <model> test-renderer <table> ;
 
-[ ] [
+{ } [
     test-table "table" set
 ] unit-test
 
-[ ] [
+{ } [
     "table" get <scroller> "scroller" set
 ] unit-test
 
-[ { "Justin" "Timberlake" } { "Britney" "Spears" } ] [
+{ { "Justin" "Timberlake" } { "Britney" "Spears" } } [
     test-table t >>selection-required? dup [
         {
             [ 1 select-row ]
@@ -55,7 +55,7 @@ M: silly-renderer column-titles drop { "Foo" } ;
 : test-table-2 ( -- table )
     { 1 2 f } <model> silly-renderer <table> ;
 
-[ f f ] [
+{ f f } [
     test-table dup [
         selected-row
     ] with-grafted-gadget