steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

tools.deploy.backend: make-deploy-image back out 

So "deploy-image-only" still works
db4
Joe Groff 2011-11-21 14:20:57 -08:00
parent 932315a852
commit 80bd1aef1c
1 changed files with 5 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
basis/tools/deploy/backend/backend.factor
View File

@ -120,12 +120,15 @@ DEFER: ?make-staging-image
[ "invalid vocab manifest!" throw ] if [ "invalid vocab manifest!" throw ] if
] if-empty ; ] if-empty ;
:: make-deploy-image-executable ( vm image vocab config -- manifest ) :: make-deploy-image ( vm image vocab config -- manifest )
make-boot-image make-boot-image
vocab "vocab-manifest-" prepend temp-file :> manifest-file vocab "vocab-manifest-" prepend temp-file :> manifest-file
image vocab manifest-file config deploy-command-line :> flags image vocab manifest-file config deploy-command-line :> flags
vm flags run-factor vm flags run-factor
image vm embed-image
manifest-file parse-vocab-manifest-file ; manifest-file parse-vocab-manifest-file ;
:: make-deploy-image-executable ( vm image vocab config -- manifest )
vm image vocab config make-deploy-image
image vm embed-image ;
HOOK: deploy* os ( vocab -- ) HOOK: deploy* os ( vocab -- )