   [item account]
   (assoc item :polarized-amount (accounts/polarize-amount item account)))
 
-(defn- prepare-item-for-return
+(defn- after-item-read
   "Makes adjustments to a transaction item in prepartion for return
   from the data store"
-  ([item] (prepare-item-for-return item nil))
+  ([item] (after-item-read item nil))
   ([item account]
    (if (map? item)
      (cond-> item

  [storage-spec ids]
  (with-storage [s storage-spec]
    (->> (find-transaction-items-by-ids s ids)
         (map prepare-item-for-return))))

(defn items-by-account
  "Returns the transaction items for the specified account"

            (:account-id reference-item)
            (tc/to-long transaction-date))
          (remove #(= (:id reference-item) (:id %)))
          (map after-item-read)))))

(defn- upsert-item
  "Updates the specified transaction item"
