brmlab/hackerbase
4
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Print mailing lists.

Browse source
This commit is contained in:
Dominik Pantůček 2023-04-06 19:50:38 +02:00
parent 262c67a3b9
commit 6aab5d9fcf
1 changed files with 3 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

4
src/members-print.scm
View file

@ -137,7 +137,9 @@
(list (ansi-string #:red #:bold (symbol->string k)) (list (ansi-string #:red #:bold (symbol->string k))
(ansi-string #:red #:bold "---"))))))) (ansi-string #:red #:bold "---")))))))
sikeys)) sikeys))
(result (filter identity (append head body)))) (mailman (list (list "Mailing Lists"
(string-intersperse (member-mailman mr) ", "))))
(result (filter identity (append head body mailman))))
(table->string result #:table-border #f #:row-border #t #:col-border #t #:ansi #t))) (table->string result #:table-border #f #:row-border #t #:col-border #t #:ansi #t)))
;; Prints nicely formatted table ;; Prints nicely formatted table