 (defn create-wallet-generator [index-generator]
   (fn []
     (let [index (index-generator)]
-      {:sso-id (str "sso-id-" index)
-       :name (str "name" index)
+      {:name (str "name" index)
        :email (str "test-" index "@email.com")})))
 
 (defn create-transaction-generator [from-selector to-selector amount-generator]

            [monger.core :as monger]
            [freecoin.config :as config]
            [freecoin.db.mongo :as mongo]
            [freecoin.blockchain :as blockchain]
            [freecoin.db.wallet :as wallet]
            [freecoin.db.uuid :as uuid])

      (swap! current-index inc))))

(defn populate-db [db n-wallets n-transactions]
  (let [stores-m (storage/create-mongo-stores db)
        blockchain (blockchain/new-stub stores-m)
        wallet-store (:wallet-store stores-m)
        wallet-data-generator (create-wallet-generator (create-index-generator))
        transaction-data-generator (create-transaction-generator random-selection random-selection random-amount)
        wallets-and-secrets (->> #(new-wallet! wallet-store blockchain
