-
-USING: kernel namespaces system io.files bootstrap.image http.client
- builder.util update update.backup ;
-
+USING: kernel namespaces system io.files io.pathnames io.directories
+bootstrap.image http.client update update.backup update.util ;
IN: update.latest
! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
: git-pull-master ( -- )
- image parent-directory
+ image-path parent-directory
[
{ "git" "pull" "git://factorcode.org/git/factor.git" "master" }
run-command
! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
: rebuild-latest ( -- )
- image parent-directory
+ image-path parent-directory
[
backup
download-latest-image
! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
: update-latest ( -- )
- image parent-directory
+ image-path parent-directory
[
git-id
git-pull-master
! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
-MAIN: update-latest
\ No newline at end of file
+MAIN: update-latest