Parse new start/stop properly, show it in member info table.

This commit is contained in:
Dominik Pantůček 2023-05-21 21:39:13 +02:00
parent 9ed3ef4423
commit f20f815784
2 changed files with 2 additions and 2 deletions

View file

@ -109,7 +109,7 @@
(info
,(lambda (mr output key value)
(case key
((student suspend member)
((student suspend member revision chair council grant)
(let* ((res (period-markers->cal-periods value))
(ok? (car res))
(periods (cadr res))

View file

@ -108,7 +108,7 @@
(caddr c)))
(brmember-credit mr))
#:col-border #t)))
((suspend student member)
((suspend student member council chair revision grant)
(list k
(table->string
(cons (list "Since" "Until")