From f20f8157843edaa838d23cc5d1f86437b7ac59b9 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Dominik=20Pant=C5=AF=C4=8Dek?= Date: Sun, 21 May 2023 21:39:13 +0200 Subject: [PATCH] Parse new start/stop properly, show it in member info table. --- src/brmember-parser.scm | 2 +- src/members-print.scm | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/src/brmember-parser.scm b/src/brmember-parser.scm index 2929cd4..2f7efe7 100644 --- a/src/brmember-parser.scm +++ b/src/brmember-parser.scm @@ -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)) diff --git a/src/members-print.scm b/src/members-print.scm index e8d6493..a842dca 100644 --- a/src/members-print.scm +++ b/src/members-print.scm @@ -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")