ui.gadgets: clone loc and dim

diff --git a/extra/ui/gadgets/gadgets.factor b/extra/ui/gadgets/gadgets.factor
index 0c2caebb3d7425bc2e270f83785f342e807676ba..a4cdd69d69070e2fd4730298022012858c450588 100755 (executable)
--- a/extra/ui/gadgets/gadgets.factor
+++ b/extra/ui/gadgets/gadgets.factor
@@ -29,6 +29,8 @@ M: gadget model-changed 2drop ;
 
 : new-gadget ( class -- gadget )
     new
+        { 0 0 } clone >>loc
+        { 0 0 } clone >>dim
         { 0 1 } >>orientation
         t >>visible?
         { f f } >>graft-state ; inline