From 992da4c9675a3d346b5a69dfdb659190434e744f Mon Sep 17 00:00:00 2001
From: Doug Coleman <doug.coleman@gmail.com>
Date: Mon, 9 Feb 2009 20:19:18 -0600
Subject: [PATCH] Fix copy-vm word on Unix

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

diff --git a/basis/tools/deploy/backend/backend.factor b/basis/tools/deploy/backend/backend.factor
index 22d6eb2ffa..ff851edce6 100755
--- a/basis/tools/deploy/backend/backend.factor
+++ b/basis/tools/deploy/backend/backend.factor
@@ -12,7 +12,7 @@ destructors accessors ;
 IN: tools.deploy.backend
 
 : copy-vm ( executable bundle-name -- vm )
-    [ prepend-path ] dip append vm over copy-file ;
+    prepend-path vm over copy-file ;
 
 : copy-fonts ( name dir -- )
     deploy-ui? get [