Delete empty unit tests files, remove 1- and 1+, reorder IN: lines in a lot of places...

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

diff --git a/basis/ui/gadgets/tables/tables.factor b/basis/ui/gadgets/tables/tables.factor
index 504427827fb447f371e829494a99fda4f07f02a7..ccc5550adb41132dafee9f53e3c2155cbc97142b 100644 (file)
--- a/basis/ui/gadgets/tables/tables.factor
+++ b/basis/ui/gadgets/tables/tables.factor
@@ -413,10 +413,10 @@ PRIVATE>
     0 select-row ;
 
 : last-row ( table -- )
-    dup control-value length 1- select-row ;
+    dup control-value length 1 - select-row ;
 
 : prev/next-page ( table n -- )
-    over visible-lines 1- * prev/next-row ;
+    over visible-lines 1 - * prev/next-row ;
 
 : previous-page ( table -- )
     -1 prev/next-page ;
@@ -503,4 +503,4 @@ M: table viewport-column-header
     dup renderer>> column-titles
     [ <column-headers> ] [ drop f ] if ;
 
-PRIVATE>
\ No newline at end of file
+PRIVATE>