]> gitweb.factorcode.org Git - factor.git/blobdiff - extra/ui/gadgets/slate/slate.factor
ui.gadgets.cartesian: cleanup
[factor.git] / extra / ui / gadgets / slate / slate.factor
index 6dbb1357439a9c9688f0ae7f149997eeba277454..21dfcdfe440307c8b753d4b9757c83913a5763a1 100644 (file)
@@ -9,10 +9,10 @@ IN: ui.gadgets.slate
 TUPLE: slate < gadget action pdim graft ungraft ;
 
 : init-slate ( slate -- slate )
-  [ ]         >>action
-  { 200 200 } >>pdim
-  [ ]         >>graft
-  [ ]         >>ungraft ;
+    [ ]         >>action
+    { 200 200 } >>pdim
+    [ ]         >>graft
+    [ ]         >>ungraft ;
 
 : <slate> ( action -- slate )
     slate new