21 lines
649 B
Factor
21 lines
649 B
Factor
! Copyright (C) 2010 Slava Pestov.
|
|
! See http://factorcode.org/license.txt for BSD license.
|
|
USING: io kernel make mason.version.common mason.version.files
|
|
sequences ;
|
|
IN: mason.version.binary
|
|
|
|
: binary-release-command ( version builder -- command )
|
|
[
|
|
"cp " %
|
|
[ nip binary-package-name % " " % ]
|
|
[ remote-binary-release-name % ]
|
|
2bi
|
|
] "" make ;
|
|
|
|
: binary-release-script ( version builders -- string )
|
|
[ binary-release-command ] with map "\n" join ;
|
|
|
|
: do-binary-release ( version builders -- )
|
|
"Copying binary releases to release directory..." print flush
|
|
binary-release-script execute-on-server ;
|