update deploy backends not to include dll in deployed apps
parent
6d8c30ad98
commit
6fdba565a1
|
@ -34,9 +34,6 @@ IN: tools.deploy.macosx
|
||||||
"Contents/Info.plist" append-path
|
"Contents/Info.plist" append-path
|
||||||
write-plist ;
|
write-plist ;
|
||||||
|
|
||||||
: copy-dll ( bundle-name -- )
|
|
||||||
"Frameworks/libfactor.dylib" copy-bundle-dir ;
|
|
||||||
|
|
||||||
: copy-nib ( bundle-name -- )
|
: copy-nib ( bundle-name -- )
|
||||||
deploy-ui? get [
|
deploy-ui? get [
|
||||||
"Resources/English.lproj/MiniFactor.nib" copy-bundle-dir
|
"Resources/English.lproj/MiniFactor.nib" copy-bundle-dir
|
||||||
|
@ -50,11 +47,9 @@ IN: tools.deploy.macosx
|
||||||
: create-app-dir ( vocab bundle-name -- vm )
|
: create-app-dir ( vocab bundle-name -- vm )
|
||||||
{
|
{
|
||||||
[
|
[
|
||||||
nip {
|
nip
|
||||||
[ copy-dll ]
|
[ copy-nib ]
|
||||||
[ copy-nib ]
|
[ "Contents/Resources" append-path make-directories ] bi
|
||||||
[ "Contents/Resources" append-path make-directories ]
|
|
||||||
} cleave
|
|
||||||
]
|
]
|
||||||
[ copy-icns ]
|
[ copy-icns ]
|
||||||
[ create-app-plist ]
|
[ create-app-plist ]
|
||||||
|
|
|
@ -11,16 +11,12 @@ IN: tools.deploy.windows
|
||||||
|
|
||||||
CONSTANT: app-icon-resource-id "APPICON"
|
CONSTANT: app-icon-resource-id "APPICON"
|
||||||
|
|
||||||
: copy-dll ( bundle-name -- )
|
|
||||||
"resource:factor.dll" swap copy-file-into ;
|
|
||||||
|
|
||||||
:: copy-vm ( executable bundle-name extension -- vm )
|
:: copy-vm ( executable bundle-name extension -- vm )
|
||||||
vm "." split1-last drop extension append
|
vm "." split1-last drop extension append
|
||||||
bundle-name executable ".exe" append append-path
|
bundle-name executable ".exe" append append-path
|
||||||
[ copy-file ] keep ;
|
[ copy-file ] keep ;
|
||||||
|
|
||||||
: create-exe-dir ( vocab bundle-name -- vm )
|
: create-exe-dir ( vocab bundle-name -- vm )
|
||||||
dup copy-dll
|
|
||||||
deploy-console? get ".com" ".exe" ? copy-vm ;
|
deploy-console? get ".com" ".exe" ? copy-vm ;
|
||||||
|
|
||||||
: open-in-explorer ( dir -- )
|
: open-in-explorer ( dir -- )
|
||||||
|
|
Loading…
Reference in New Issue