Fix mailman building and jendasap-checked.
This commit is contained in:
parent
f6c7faff84
commit
10174a81a2
2 changed files with 4 additions and 2 deletions
|
@ -156,7 +156,7 @@ CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
|
||||||
(if (-action-)
|
(if (-action-)
|
||||||
(let ((mb (load-members (*members-directory*) #t)))
|
(let ((mb (load-members (*members-directory*) #t)))
|
||||||
(if (-needs-bank-)
|
(if (-needs-bank-)
|
||||||
(members-payments-process mb (-apikeys-file-) (-bank-dir-) (jendasap-checked-))
|
(members-payments-process mb (-apikeys-file-) (-bank-dir-) (-jendasap-checked-))
|
||||||
mb))
|
mb))
|
||||||
#f))
|
#f))
|
||||||
|
|
||||||
|
|
|
@ -33,6 +33,8 @@
|
||||||
)
|
)
|
||||||
|
|
||||||
(import scheme
|
(import scheme
|
||||||
|
(chicken base)
|
||||||
|
(chicken pathname)
|
||||||
utils)
|
utils)
|
||||||
|
|
||||||
;; Where does the mailman binaries reside
|
;; Where does the mailman binaries reside
|
||||||
|
@ -40,7 +42,7 @@
|
||||||
|
|
||||||
;; Returns full path to given mailman binary
|
;; Returns full path to given mailman binary
|
||||||
(define (mailman-bin bin)
|
(define (mailman-bin bin)
|
||||||
(make-path (*mailman-bin*) bin))
|
(make-pathname (*mailman-bin*) bin))
|
||||||
|
|
||||||
;; Mailman-specific process output lines capture
|
;; Mailman-specific process output lines capture
|
||||||
(define (get-mailman-output-lines bin)
|
(define (get-mailman-output-lines bin)
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue