examples: fix bug in mail.forth
FossilOrigin-Name: 1c8faed670c65885b2eeec91e8ab37f52394f649d2fe84d33497c27a2b8f2a2d
This commit is contained in:
parent
af87f7d2db
commit
690ce4ed36
1 changed files with 1 additions and 1 deletions
|
@ -3,7 +3,7 @@ sending emails from within RETRO.
|
|||
|
||||
~~~
|
||||
:mail:send (sss-)
|
||||
swap 'mail_-s_"%s"_%s s:format file:W unix:popen ;
|
||||
swap 'mail_-s_"%s"_%s s:format file:W unix:popen
|
||||
swap [ over file:write ] s:for-each unix:pclose ;
|
||||
~~~
|
||||
|
||||
|
|
Loading…
Reference in a new issue