       (dissoc :items)
       (update-in [:transaction-date] tc/to-long)))
 
-(defn- prepare-for-return
+(defn- after-read
   "Returns a transaction that is ready for public use"
   [transaction]
   (when transaction

            (:account-id reference-item)
            (:index reference-item))
          (remove #(= (:id reference-item) (:id %)))
          (map prepare-item-for-return))))
  ([storage-spec reference-item transaction-date]
   (with-storage [s storage-spec]
     (->> (select-transaction-items-by-account-id-on-or-after-date

  (with-storage [s storage-spec]
    (->> criteria
         (select-transaction-items s)
         (map after-item-read))))
