anchor.diff:      true = (Password =/= undefined),
       true = (Hostname =/= undefined),
   
  +    ?log_debug("Doing remote cluster"),
  +
       {Host, Port} = host_and_port(Hostname),
   
       Cert = proplists:get_value(cert, Cluster),
  
positive.code:     JsonGet(
        "/pools",
        fun (PoolsRaw) ->
                expect_object(
                  PoolsRaw, Context,
                  fun (Pools) ->
  
negative.code: mk_json_get_for_node(#remote_node{host = Host,
                                    port = Port,
                                    https_port = SPort},
                       Cert, Username, Password, ForceNewConnection) ->
      case Cert =/= undefined of
          true ->
              OptionsOverride = case ForceNewConnection of
                                    true ->
                                        [{pool, ns_null_connection_pool},
                                         {connect_options, [{reuse_sessions, false}]}];
                                    false ->
                                        []
                                end,
              {mk_ssl_json_get(Host, SPort, Username, Password, Cert, OptionsOverride),
               "https", Host, SPort};
          _ ->
              OptionsOverride = case ForceNewConnection of
                                    true ->
                                        [{pool, ns_null_connection_pool}];
                                    false ->
                                        []
                                end,
              %% TODO: this doesn't hold right now
              %% undefined = SPort,
              {mk_plain_json_get(Host, Port, Username, Password, OptionsOverride), "http", Host, Port}
      end.
  
  mk_ssl_json_get(Host, Port, Username, Password, CertPEM, HttpOptionsOverride) ->
  