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

Work on making the lists more 2.xx-like.

Browse source
This commit is contained in:
Dominik Pantůček 2023-09-15 17:50:00 +02:00
parent d802cf13c8
commit aaa6e582a4
4 changed files with 44 additions and 42 deletions
Download patch file Download diff file Expand all files Collapse all files

7
src/mailman3.scm
View file

@ -35,6 +35,7 @@
(import scheme
(chicken string)
(chicken sort)
(chicken format)
configuration
util-io)
@ -51,12 +52,14 @@
;; Returns the list of available lists
(define (list-mailman3-lists)
(get-mailman3-output-lines "lists -q"))
(get-mailman3-output-lines "lists" "-q"))
;; Returns the list of members of given list
(define (list-mailman3-list-members lst)
(sort
(get-mailman3-output-lines "members" lst "-e")
(get-mailman3-output-lines "members"
(format "~A@brmlab.cz" lst)
"-e")
string-ci<?))
)