Load sender address from configuration.
This commit is contained in:
parent
8e188a0a8c
commit
073c1efbc6
4 changed files with 16 additions and 10 deletions
|
@ -62,6 +62,7 @@
|
|||
(define =apikeys-file= (make-parameter #f))
|
||||
(define =jendasap-checked= (make-parameter #f))
|
||||
(define =bank-dir= (make-parameter #f))
|
||||
(define =email-from= (make-parameter #f))
|
||||
|
||||
;; Arguments parsing
|
||||
(command-line
|
||||
|
@ -108,7 +109,7 @@
|
|||
(-quiet- #t)
|
||||
(*progress-quiet* #t))
|
||||
(-from (email) "Sender email address"
|
||||
(*reminder-from* email))
|
||||
(=email-from= email))
|
||||
""
|
||||
"Query options:"
|
||||
(-mi (id) "Specify member by id" (-member-id- (string->number id)))
|
||||
|
@ -179,6 +180,8 @@
|
|||
(*jendasap-checked* (=jendasap-checked=)))
|
||||
(when (=bank-dir=)
|
||||
(*bank-dir* (=bank-dir=)))
|
||||
(when (=email-from=)
|
||||
(*email-from* (=email-from=)))
|
||||
|
||||
;; Run tests
|
||||
(when (-run-tests?-)
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue