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

webapps.mason.version.source: fix bugs discovered during 0.94 release

db4
Slava Pestov 2010-09-20 21:11:53 -07:00
parent 3bd23f2414
commit b361e1b694
1 changed files with 5 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
extra/webapps/mason/version/source/source.factor
View File

@ -20,7 +20,7 @@ IN: webapps.mason.version.source
".gitignore" delete-file ; ".gitignore" delete-file ;
: download-images ( -- ) : download-images ( -- )
images [ download-image ] each ; images [ boot-image-name download-image ] each ;
: prepare-source ( git-id -- ) : prepare-source ( git-id -- )
"factor" [ "factor" [
@ -36,8 +36,10 @@ IN: webapps.mason.version.source
: make-source-release ( version git-id -- path ) : make-source-release ( version git-id -- path )
"Creating source release..." print flush "Creating source release..." print flush
[ [
current-temporary-directory get [
clone-factor prepare-source (make-source-release) clone-factor prepare-source (make-source-release)
"Package created: " write absolute-path dup print "Package created: " write absolute-path dup print
] with-directory
] with-unique-directory drop ; ] with-unique-directory drop ;
: upload-source-release ( package version -- ) : upload-source-release ( package version -- )