anchor.diff:      true = (Username =/= undefined),
       true = (Password =/= undefined),
       true = (Hostname =/= undefined),
  -
  -    ?log_debug("Doing remote cluster"),
   
       {Host, Port} = host_and_port(Hostname),
   
  
positive.code:     fun (Path, K) ->
              URL = menelaus_rest:rest_url(Host, Port, Path, Scheme),
              ?log_debug("Doing get of ~s", [URL]),
              ?log_debug("args: ~p", [{get,
                                       {URL, {Host, Port, Path}},
                                       {Username, Password},
                                       Options}]),
              R = menelaus_rest:json_request_hilevel(get,
                                                     {URL, {Host, Port, Path}},
                                                     {Username, Password},
                                                     Options),
  
              ?log_debug("R: ~p", [R]),
  
              case R of
                  {ok, Value} ->
  
negative.code:     JsonGet(
        "/pools",
        fun (PoolsRaw) ->
                expect_object(
                  PoolsRaw, Context,
                  fun (Pools) ->
  