Split mandatory and optional keys.
This commit is contained in:
parent
63372e10ab
commit
a56ff102f7
3 changed files with 5 additions and 3 deletions
2
Makefile
2
Makefile
|
@ -49,7 +49,7 @@ BBSTOOL-SOURCES=bbstool.scm testing.scm listing.scm dictionary.scm \
|
|||
month.scm period.scm ansi.scm command-line.scm \
|
||||
members-base.scm utils.scm primes.scm member-record.scm \
|
||||
configuration.scm progress.scm table.scm cards.scm \
|
||||
member-print.scm
|
||||
member-print.scm member-parser.scm
|
||||
|
||||
BBSTOOL-OBJS=testing.o listing.o month.o period.o ansi.o dictionary.o \
|
||||
command-line.o members-base.o utils.o primes.o \
|
||||
|
|
|
@ -43,7 +43,7 @@ CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
|
|||
member-parser)
|
||||
|
||||
;; Print banner
|
||||
(print "bbstool 0.4 (c) 2023 Brmlab, z.s.")
|
||||
(print "bbstool 0.5 (c) 2023 Brmlab, z.s.")
|
||||
(newline)
|
||||
|
||||
;; Command-line options and configurable parameters
|
||||
|
|
|
@ -45,7 +45,9 @@
|
|||
configuration)
|
||||
|
||||
;; Pass 2: known keys and multikeys
|
||||
(define member-schema-known-keys '(nick mail phone name born joined destroyed))
|
||||
(define mandatory-keys '(nick name mail phone))
|
||||
(define optional-keys '(born joined destroyed))
|
||||
(define member-schema-known-keys (append mandatory-keys optional-keys))
|
||||
(define member-schema-known-multikeys '(card desfire credit studentstart studentstop suspendstart suspendstop))
|
||||
|
||||
;; Pass 3: Interpreter passes
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue