upload-build-images ( -- )

Vocabulary

bootstrap.image.upload

Inputs

None

Outputs

None

Definition

USING: io.directories io.launcher kernel make namespaces ;

IN: bootstrap.image.upload

: upload-build-images ( -- )
    [
        [
            \ scp-name get-global scp-name or , "-4" ,
            "." directory-files % build-destination ,
        ] { } make try-process
    ] with-build-images ;