   [context {:keys [record-type record-count]}]
   (-> context
       (assoc-in [:progress record-type :total] record-count)
-      update-progress))
+      notify-progress))
 
 (defmethod import-record :account
   [context account]

      (import-record record)

      (report-progress? record-type)
      (inc-and-update-progress record-type))))

(defn import-data
  "Reads the contents from the specified input and saves

  (>!! progress-chan progress)
  context)

(defn- inc-and-notify-progress
  [context record-type]
  (-> context
      (update-in [:progress record-type :imported]
                 (fnil inc 0))
      notify-progress))

(defmulti import-record
  (fn [_ record]
