Load all if requested inverted.

src/bbstool.scm

@@ -167,15 +167,15 @@ CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
 ;; Load ML(s) and merge them
 (define MB
   (if (-ml-all-)
-      (let ()
-	(define internal-ml (load-mailman-list "internal"))
-	(members-base-merge-mailman MB0 internal-ml))
       (let ()
 	(define mls (load-mailman-lists))
 	(foldl (lambda (mb ml)
 		 (members-base-merge-mailman mb ml))
 	       MB0
-	       mls))))
+	       mls))
+      (let ()
+	(define internal-ml (load-mailman-list "internal"))
+	(members-base-merge-mailman MB0 internal-ml))))
 
 ;; If a member is specified by either id or nick, get its record
 (define mr