new accessors

2008-08-31 16:22:25 -05:00 · 2008-08-31 16:22:25 -05:00 · f7c27f4127
parent 24bf9e3f9c
commit f7c27f4127
1 changed files with 1 additions and 1 deletions
--- a/basis/ui/gadgets/incremental/incremental.factor
+++ b/basis/ui/gadgets/incremental/incremental.factor
@ -41,7 +41,7 @@ M: incremental pref-dim*
    swap set-rect-loc ;

 : prefer-incremental ( gadget -- )
-    dup forget-pref-dim dup pref-dim swap set-rect-dim ;
+    dup forget-pref-dim dup pref-dim >>dim drop ;

 : add-incremental ( gadget incremental -- )
    not-in-layout