brmlab/hackerbase
4
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Add max suspended months to specification.

Browse source
This commit is contained in:
Dominik Pantůček 2023-04-12 20:48:10 +02:00
parent 0fa45c375b
commit 3b67044a6f
5 changed files with 22 additions and 18 deletions
Download patch file Download diff file Expand all files Collapse all files

5
src/configuration.scm
View file

@ -30,8 +30,6 @@
(
*current-month*
*member-suspend-max-months*
*etc-hackerbase*
*members-directory*
@ -59,9 +57,6 @@
(list (+ 1900 (vector-ref d 5))
(+ (vector-ref d 4) 1)))))
;; How long the member can be suspended without any action required?
(define *member-suspend-max-months* (make-parameter 24))
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; Initial configuration from *etc-hackerbase*