From 0f46ff8a151eae8140cc95c13668e53dc06375ca Mon Sep 17 00:00:00 2001
From: Slava Pestov <slava@factorcode.org>
Date: Wed, 31 Oct 2007 21:52:46 -0400
Subject: [PATCH] Fix unnecessary dup

---
 extra/ui/tools/deploy/deploy.factor | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/extra/ui/tools/deploy/deploy.factor b/extra/ui/tools/deploy/deploy.factor
index 1f2baf6c49..e5a035dc06 100644
--- 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,