Basic flags usage and show in overview.
This commit is contained in:
parent
f9191264e3
commit
7dd3eb1586
2 changed files with 34 additions and 1 deletions
|
@ -339,7 +339,12 @@
|
|||
(if (brmember-suspended? mr) 'suspended #f)
|
||||
(if (brmember-active? mr) 'active #f)
|
||||
(if (brmember-destroyed? mr) 'destroyed #f)
|
||||
(if (brmember-existing? mr) 'existing #f))))
|
||||
(if (brmember-existing? mr) 'existing #f)
|
||||
(if (brmember-chair? mr) 'chair #f)
|
||||
(if (brmember-council? mr) 'council #f)
|
||||
(if (brmember-revision? mr) 'revision #f)
|
||||
(if (brmember-grant? mr) 'grant #f)
|
||||
)))
|
||||
|
||||
;; Nickname as string
|
||||
(define (brmember-nick mr)
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue