1 ! Copyright (C) 2008 James Cash
2 ! See http://factorcode.org/license.txt for BSD license.
3 USING: io io.files io.files.info.unix io.backend kernel
4 namespaces make sequences system tools.deploy.backend
5 tools.deploy.config tools.deploy.config.editor assocs hashtables
9 : create-app-dir ( vocab bundle-name -- vm )
12 dup OCT: 755 set-file-permissions ;
14 : bundle-name ( -- str )
17 M: unix deploy* ( vocab -- )
20 [ bundle-name create-app-dir ] keep
21 [ bundle-name image-name ] keep
22 namespace make-deploy-image
23 bundle-name normalize-path [ "Binary deployed to " % % "." % ] "" make print