@@ -426,10 +426,11 @@
 
 			"-convert-to-norm"
 			"-convert-to-old"
 			"-import-megatest.db"
 			"-sync-to-megatest.db"
+                        "-sync-brute-force"
 			"-logging"
 			"-v" ;; verbose 2, more than normal (normal is 1)
 			"-q" ;; quiet 0, errors/warnings only
 
                         "-diff-rep"
@@ -2296,10 +2297,14 @@
        'adj-testids
        'old2new
        ;; 'new2old
        )
       (set! *didsomething* #t)))
+
+(when (args:get-arg "-sync-brute-force")
+  ((server:get-bruteforce-syncer (db:setup #t) persist-until-sync: #t))
+  (set! *didsomething* #t))
 
 (if (args:get-arg "-sync-to-megatest.db")
     (let* ((dbstruct (db:setup #f))
 	   (tmpdbpth (cdr (dbr:dbstruct-tmpdb dbstruct)))
 	   (lockfile (conc tmpdbpth ".lock"))