ui.gadgets.grids: Update 'grid-remove'

2008-07-25 12:37:09 -05:00 · 2008-07-25 12:37:09 -05:00 · 8a90325f67
parent f4809d92d9
commit 8a90325f67
1 changed files with 1 additions and 1 deletions
--- a/extra/ui/gadgets/grids/grids.factor
+++ b/extra/ui/gadgets/grids/grids.factor
@ -30,7 +30,7 @@ grid
  >r >r 2dup swap add-gadget drop r> r>
  3dup grid-child unparent rot grid>> nth set-nth ;

-: grid-remove ( grid i j -- grid ) <gadget> -rot grid-add* ;
+: grid-remove ( grid i j -- grid ) <gadget> -rot grid-add ;

 : pref-dim-grid ( grid -- dims )
    grid>> [ [ pref-dim ] map ] map ;