Add dokuwiki problems to summary email.

src/notifications.scm

@@ -227,11 +227,27 @@
 		 #:border '(((#:bottom #:right light) ... (#:bottom light))
 			    ((#:right light) ... none)
 			    ...)
-		 )))))
+		 ))))
+	  (dwpu (filter (lambda (dwu)
+			  (or (member "member" (list-ref dwu 3))
+			      (member "council" (list-ref dwu 3))
+			      (member "admin" (list-ref dwu 3))))
+			(ldict-ref mb 'dokuwiki)))
+	  (dw-lst
+	   (if (null? dwpu)
+	       '()
+	       (list ""
+		     "DokuWiki users (non-members) in wrong group(s):"
+		     (string-append
+		      "  "
+		      (string-intersperse
+		       (map car dwpu)
+		       ", "))))))
      (append income-lst
 	     unpaired-lst
 	     debtors-lst
 	     boring-lst
+	     dw-lst
 	     (list ""
 		   "--"
 		   "Brmlab Hackerspace Members Database"