Fix unnecessary dup

2007-10-31 21:52:46 -04:00 · 2007-10-31 21:52:46 -04:00 · 0f46ff8a15
parent 79e81994ad
commit 0f46ff8a15
1 changed files with 1 additions and 1 deletions
--- a/extra/ui/tools/deploy/deploy.factor
+++ b/extra/ui/tools/deploy/deploy.factor
@ -96,7 +96,7 @@ deploy-gadget "toolbar" f {
    g <toolbar> { 10 10 } over set-pack-gap gadget, ;

 : <deploy-gadget> ( vocab -- gadget )
-    dup f deploy-gadget construct-boa [
+    f deploy-gadget construct-boa [
        <deploy-settings>
        g-> set-deploy-gadget-settings gadget,
        buttons,