Stream line highlights queries.

This commit is contained in:
Dominik Pantůček 2023-03-28 11:55:14 +02:00
parent 68c2d2e11b
commit bb970b6eb9
3 changed files with 20 additions and 16 deletions

View file

@ -30,7 +30,6 @@
(
*current-month*
*member-file-context*
*member-file-check-syntax*
*member-default-joined*
*member-suspend-max-months*
)
@ -51,12 +50,6 @@
;; Configuration of error reporting
(define *member-file-context* (make-parameter 3))
;; Tolerance to formal errors (invalid key or key without value):
;; 'error - show source and exits with error
;; 'warning - show source and error, continue
;; 'quiet - ignore
(define *member-file-check-syntax* (make-parameter 'error))
;; Default as specified by the original implementation if the 'joined
;; key is missing in member file.
(define *member-default-joined* (make-parameter (make-month 2015 1)))