 
     (->> sm
          (iterate transition)
-         (take-while #(not= :machine/stop (:state %)))
+         (take-while #(not= :machina/stop (:state %)))
          (last))
 
 

        (assoc sm :state :write-to-file))}

     :error-policies
     {:machine/default {:type        :retry
                        :max-retry   :forever
                        :retry-delay [:random-exp-backoff :base 3000 :+/- 0.35 :max 25000]}



    (->> sm
         (iterate transition)
         (take-while #(not= :machina/stop (:state %)))
         (last))


