builder: fix run-or-send-file bug
parent
8cc7720c1f
commit
e7bf56ad57
|
@ -56,7 +56,7 @@ SYMBOL: builder-recipients
|
||||||
|
|
||||||
: run-or-send-file ( desc message file -- )
|
: run-or-send-file ( desc message file -- )
|
||||||
>r >r [ try-process ] curry
|
>r >r [ try-process ] curry
|
||||||
r> r> [ email-string throw ] 2curry
|
r> r> [ email-file throw ] 2curry
|
||||||
recover ;
|
recover ;
|
||||||
|
|
||||||
! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
|
! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
|
||||||
|
|
Loading…
Reference in New Issue