new accessor

2008-08-31 16:24:53 -05:00 · 2008-08-31 16:24:53 -05:00 · 6474ed69a7
parent d2861cae6e
commit 6474ed69a7
1 changed files with 1 additions and 1 deletions
--- a/basis/ui/render/render.factor
+++ b/basis/ui/render/render.factor
@ -138,7 +138,7 @@ M: polygon draw-interior

 : <polygon-gadget> ( color points -- gadget )
    dup max-dim
-    >r <polygon> <gadget> r> over set-rect-dim
+    >r <polygon> <gadget> r> >>dim
    [ (>>interior) ] keep ;

 ! Font rendering