Fix deploy

db4
Slava Pestov 2008-02-04 20:49:59 -06:00
parent f09b78e766
commit b2cd79ebdd
1 changed files with 1 additions and 0 deletions

View File

@ -80,6 +80,7 @@ IN: tools.deploy.backend
] { } make ;
: make-deploy-image ( vm image vocab config -- )
make-boot-image
dup staging-image-name exists? [
>r pick r> tuck make-staging-image
] unless