diff --git a/src/hackerbase.scm b/src/hackerbase.scm index 0c619c6..462afaf 100644 --- a/src/hackerbase.scm +++ b/src/hackerbase.scm @@ -98,6 +98,8 @@ (*bank-dir* dir)) (-checked (file) "File with last checked bank transaction ID" (*checked-file* file)) + (-dokuwiki (dir) "Base directory of DokuWiki" + (*doku-base* dir)) "" "Email options:" (-from (email) "Sender email address" @@ -218,7 +220,7 @@ #f)) ;; Load ML(s) and merge them -(define-values (MB internal-ml) +(define-values (MB1 internal-ml) (if MB0 (if (-ml-all-) (let () @@ -234,6 +236,9 @@ internal-ml))) (values #f #f))) +;; Load DokuWiki users +(define MB MB1) + ;; If a member is specified by either id or nick, get its record (define mr (if (-member-id-)