Duck util-mail.
This commit is contained in:
parent
23db356dec
commit
b9a563d4ac
5 changed files with 73 additions and 49 deletions
|
@ -405,3 +405,35 @@ quoted-printable sequences.
|
|||
|
||||
Returns the ```str``` with all characters converted to upper case
|
||||
using ```char-upcase```. Does not work with UTF-8.
|
||||
|
||||
## util-mail [module]
|
||||
|
||||
(import util-mail)
|
||||
|
||||
A simple wrapper module to send emails from UNIX system.
|
||||
|
||||
### *mailto-override* [parameter]
|
||||
|
||||
(define *mailto-override* (make-parameter #f))
|
||||
(*mailto-override*)
|
||||
(*mailto-override* email)
|
||||
|
||||
* ```email``` - email address string
|
||||
|
||||
If this parameter is non-```#f```, all outgoing emails are actually
|
||||
sent to the address stored within.
|
||||
|
||||
### send-mail [procedure]
|
||||
|
||||
(send-mail body-lines
|
||||
#:from (from #f)
|
||||
#:to to
|
||||
#:subject subject)
|
||||
|
||||
* ```body-lines``` - lines of the email
|
||||
* ```from``` - email address from string
|
||||
* ```to``` - email address to string
|
||||
* ```subject``` - email subject string
|
||||
|
||||
Sends email using mail(1) command. The arguments ```#:to``` and
|
||||
```#:subject``` are mandatory. Argument ```#:from``` is optional.
|
||||
|
|
23
doc/utils.md
23
doc/utils.md
|
@ -125,29 +125,6 @@ Returns ```#t``` if both dictionaries contain the same keys and their
|
|||
values are equal according to the provided ```equality?``` predicate
|
||||
which defaults to ```equal?```.
|
||||
|
||||
### Mail
|
||||
|
||||
(import util-mail)
|
||||
|
||||
A simple wrapper module to send emails from UNIX system.
|
||||
|
||||
(*mailto-override* [email])
|
||||
|
||||
* ```email``` - email address string
|
||||
|
||||
If this parameter is non-```#f```, all outgoing emails are actually
|
||||
sent to the address stored within.
|
||||
|
||||
(send-mail body-lines [#:from from] [#:to to] [#:subject subject])
|
||||
|
||||
* ```body-lines``` - lines of the email
|
||||
* ```from``` - email address from string
|
||||
* ```to``` - email address to string
|
||||
* ```subject``` - email subject string
|
||||
|
||||
Sends email using mail(1) command. The arguments ```#:to``` and
|
||||
```#:subject``` are mandatory. Argument ```#:from``` is optional.
|
||||
|
||||
### Set (List)
|
||||
|
||||
(import util-set-list)
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue