         {{peer_id, peer_name}, command}
       end)
       |> (fn peers_and_commands ->
+        Logger.info "sending command..., #{inspect peers_and_commands}"
         send_command(peers_and_commands)
-        get_status(peers, :pinging)
+        status = get_status(peers, :pinging)
+        Logger.info "Status: #{inspect status}"
         peers
       end).()
     end).()

    end)
    |> run([session_id: session_id])
  end

  @doc """
  Run the following sequence of commands to kickoff the Vivaldi algorithm on each peer.

    # |> send_command(:begin_pings)
    # Until then, here's a crude way to accomplish the same task: 

    # Setup configuration
    configs = generate_peer_configs(peers, common_config)

    status = get_status(peers, :not_started)
    Logger.info "Status: #{inspect status}"
    
    # Run following commands
    # configure_and_run |> get_ready |> begin_pings
