tools.deploy.macosx: oops, logic inversion

db4
Joe Groff 2011-11-21 14:20:19 -08:00
parent f5d7ec72c7
commit 932315a852
1 changed files with 5 additions and 5 deletions

View File

@ -84,11 +84,11 @@ IN: tools.deploy.macosx
] bind
] with-directory ;
: deploy-app-bundle? ( -- ? )
deploy-console? get not deploy-ui? get or ;
: deploy-app-bundle? ( vocab -- ? )
deploy-config [ deploy-console? get not deploy-ui? get or ] bind ;
M: macosx deploy* ( vocab -- )
! pass off to M: unix deploy* if we're building a console app
deploy-app-bundle?
[ call-next-method ]
[ deploy-app-bundle ] if ;
dup deploy-app-bundle?
[ deploy-app-bundle ]
[ call-next-method ] if ;