Finish members base info table.

This commit is contained in:
Dominik Pantůček 2023-03-23 16:56:07 +01:00
parent 8f378d57c9
commit 2969a2833c
5 changed files with 90 additions and 5 deletions

View file

@ -32,6 +32,7 @@
*member-file-context*
*member-file-check-syntax*
*member-default-joined*
*member-suspend-max-months*
)
(import scheme
@ -60,4 +61,7 @@
;; key is missing in member file.
(define *member-default-joined* (make-parameter (make-month 2015 1)))
;; How long the member can be suspended without any action required?
(define *member-suspend-max-months* (make-parameter 24))
)