add helper to set up test account

Author: zcesur

lib/algora/admin/admin.ex

@@ -2,6 +2,8 @@ defmodule Algora.Admin do
   @moduledoc false
   import Ecto.Query
 
+  alias Algora.Accounts.User
+  alias Algora.Payments
   alias Algora.Repo
   alias Algora.Workspace
   alias Algora.Workspace.Ticket
@@ -72,6 +74,15 @@ defmodule Algora.Admin do
     |> Algora.Repo.update()
   end
 
+  def setup_test_account(user_handle) do
+    with account_id when is_binary(account_id) <- Algora.config([:stripe, :test_account_id]),
+         {:ok, user} <- Repo.fetch_by(User, handle: user_handle),
+         {:ok, acct} <- Payments.create_account(user, "US"),
+         {:ok, stripe_acct} <- Stripe.Account.retrieve(account_id) do
+      Payments.update_account(acct, stripe_acct)
+    end
+  end
+
   defp update_tickets(url, repo_id) do
     Repo.update_all(from(t in Ticket, where: fragment("?->>'repository_url' = ?", t.provider_meta, ^url)),
       set: [repository_id: repo_id]