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

Load and call merge on DW.

Browse source
This commit is contained in:
Dominik Pantůček 2023-06-26 19:28:27 +02:00
parent dfb60f9682
commit 8d6ad646c3
3 changed files with 11 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

6
src/mbase.scm
View file

@ -58,6 +58,7 @@
mbase-active-emails
mbase-merge-mailman
mbase-merge-dokuwiki
do-with-mbase-progress%
with-mbase-progress%
@ -310,6 +311,11 @@
(add1 i))))
(progress%-advance 1)))))
;; Adds dokuwiki information to all users found, returns new mbase
;; and list of remaining users.
(define (mbase-merge-dokuwiki mb dw)
(values mb dw))
;; Simple syntax wrapper
(define-syntax with-mbase-progress%
(syntax-rules ()