List dokuwiki users in group member.

src/members-print.scm

@@ -381,7 +381,17 @@
        (print "Member files with issues: "
 	      (string-intersperse
 	       (map brmember-file-path pmrs)
-	       ", ")))))
+	       ", "))))
+   (let ((dwpu (filter (lambda (dwu)
+			 (member "member" (list-ref dwu 3)))
+		       (ldict-ref mb 'dokuwiki))))
+     (when (not (null? dwpu))
+       (newline)
+       (print "DokuWiki users in wrong group(s): "
+	      (string-intersperse
+	       (map car dwpu)
+	       ", "))))
+   )
 
  ;; Prints the stats in format used by gnuplot.
  (define (print-members-base-stats ms)