From 7e3391ffb07684ead53013b7456cabaec3a3e9cf Mon Sep 17 00:00:00 2001
From: John Benediktsson <mrjbq7@gmail.com>
Date: Thu, 20 Sep 2012 17:57:43 -0700
Subject: [PATCH] ui.gadgets.tables: i think this is clearer.

---
 basis/ui/gadgets/tables/tables.factor | 16 ++++++----------
 1 file changed, 6 insertions(+), 10 deletions(-)

diff --git a/basis/ui/gadgets/tables/tables.factor b/basis/ui/gadgets/tables/tables.factor
index 9c6dcdfd4a..2d24f68c91 100644
--- a/basis/ui/gadgets/tables/tables.factor
+++ b/basis/ui/gadgets/tables/tables.factor
@@ -194,16 +194,12 @@ M: table layout*
 : draw-columns ( columns widths alignment font gap -- )
     '[ [ _ ] 3dip _ draw-column ] 3each ;
 
-M: table draw-line ( row index table -- )
-    [
-        nip
-        [ renderer>> row-columns ]
-        [ column-widths>> ]
-        [ table-column-alignment ]
-        tri
-    ]
-    [ row-font ]
-    [ 2nip gap>> ] 3tri
+M:: table draw-line ( row index table -- )
+    row table renderer>> row-columns
+    table column-widths>>
+    table table-column-alignment
+    row index table row-font
+    table gap>>
     draw-columns ;
 
 M: table draw-gadget*