From dfc5be9e4377b56785cf0624d14264aa4fdb8212 Mon Sep 17 00:00:00 2001 From: Doug Coleman Date: Mon, 20 Jul 2015 01:23:00 -0700 Subject: [PATCH] ui.gadgetes.grids: cell -> grid-cell. it's private and hardly used and loaded by default, let's not confuse the tools with the layouts:cell. --- basis/ui/gadgets/grids/grids.factor | 12 ++++++------ 1 file changed, 6 insertions(+), 6 deletions(-) diff --git a/basis/ui/gadgets/grids/grids.factor b/basis/ui/gadgets/grids/grids.factor index 93d8e8a867..3686413933 100644 --- a/basis/ui/gadgets/grids/grids.factor +++ b/basis/ui/gadgets/grids/grids.factor @@ -35,14 +35,14 @@ PRIVATE> ( gadget -- cell ) - [ pref-dim ] [ baseline ] [ cap-height ] tri cell boa ; +: ( gadget -- cell ) + [ pref-dim ] [ baseline ] [ cap-height ] tri grid-cell boa ; -M: cell baseline baseline>> ; +M: grid-cell baseline baseline>> ; -M: cell cap-height cap-height>> ; +M: grid-cell cap-height cap-height>> ; TUPLE: grid-layout-tuple grid gap fill? row-heights column-widths ; @@ -61,7 +61,7 @@ TUPLE: grid-layout-tuple grid gap fill? row-heights column-widths ; : ( grid -- grid-layout ) \ grid-layout-tuple new swap - [ grid>> [ [ ] map ] map >>grid ] + [ grid>> [ [ ] map ] map >>grid ] [ fill?>> >>fill? ] [ gap>> >>gap ] tri