Dialing things down to avoid service unavailable.

src/clj/auto_ap/jobs/restore_from_backup.clj

@@ -76,7 +76,7 @@
                                  (mu/log ::error
                                          :exception e)
                                  (throw e)))))
-                         (->> (partition-all 1000 entities)
+                         (->> (partition-all 200 entities)
                               (s/->source)
                               (s/onto buffered)
                               (s/map (fn [entities]
@@ -84,7 +84,7 @@
                                          (reset! die? false)
                                          (throw (Exception. "dead")))
                                        (upsert-batch entities)))
-                              (s/buffer 50)
+                              (s/buffer 20)
                               (s/realize-each)))
               (swap! loaded conj entity))))