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

Actually merge the emails into base.

Browse source
This commit is contained in:
Dominik Pantůček 2023-04-06 19:46:33 +02:00
parent 43aea708f9
commit 0f76514a46
3 changed files with 23 additions and 12 deletions
Download patch file Download diff file Expand all files Collapse all files

5
src/mailman.scm
View file

@ -31,6 +31,7 @@
*mailman-bin*
list-mailman-lists
list-mailman-list-members
load-mailman-list
load-mailman-lists
find-mailman-list
mailman-list-name
@ -78,7 +79,9 @@
(define mailman-list-name car)
(define mailman-list-members cdr)
;; Loads a single mailman list as mailman structure
;; Loads a single mailman list as mailman structure, if
;; unsuccessfull, returns only a list with ML name and no member
;; emails.
(define (load-mailman-list name)
(make-mailman-list name
(list-mailman-list-members name)))