deploy-name get ;
M: unix deploy* ( vocab -- )
- "resource:" [
+ [
dup deploy-config [
[ bundle-name create-app-dir ] keep
[ deployed-image-name ] keep
bundle-name normalize-path "Binary deployed to " "." surround print
bundle-name webbrowser:open-file
] with-variables
- ] with-directory ;
+ ] with-resource-directory ;