Add option for ML sync.

src/bbstool.scm

@@ -136,6 +136,8 @@ CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
  (-unpaired () "Show latest unpaired bank transactions"
 	    (-needs-bank- #t)
 	    (-action- 'unpaired))
+ (-mlsync () "Synchronize internal ML"
+	  (-action- 'mlsync))
  )
 
 ;; Run tests
@@ -267,6 +269,8 @@ CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
   ((unpaired)
    (newline)
    (print-unpaired-table MB))
+  ((mlsync)
+   (print "Mailman sync."))
   (else
    (print "Nothing to do."))