builder: do builds-check in build-loop
parent
50b38b0ae2
commit
8d86b51e76
|
@ -97,8 +97,6 @@ SYMBOL: build-status
|
|||
|
||||
build-status off
|
||||
|
||||
builds-check
|
||||
|
||||
enter-build-dir
|
||||
|
||||
"report" [
|
||||
|
@ -160,7 +158,7 @@ SYMBOL: builder-recipients
|
|||
|
||||
: build ( -- )
|
||||
[ (build) ] [ drop ] recover
|
||||
[ send-builder-email ] [ "not sending mail" . ] recover ;
|
||||
[ send-builder-email ] [ drop "not sending mail" . ] recover ;
|
||||
|
||||
! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
|
||||
|
||||
|
@ -180,6 +178,7 @@ SYMBOL: builder-recipients
|
|||
= not ;
|
||||
|
||||
: build-loop ( -- )
|
||||
builds-check
|
||||
[
|
||||
"/builds/factor" cd
|
||||
updates-available?
|
||||
|
|
Loading…
Reference in New Issue