anchor.diff:  riak_binpath(Prefix, N) ->
       io_lib:format("~s/dev/dev~b/bin/riak", [Prefix, N]).
   
  -riak_repl_binpath(Prefix, N) ->
  -    io_lib:format("~s/dev/dev~b/bin/riak-repl", [Prefix, N]).
  -
   riakcmd(Path, N, Cmd) ->
       lists:flatten(io_lib:format("~s ~s", [riak_binpath(Path, N), Cmd])).
  -
  -riak_repl_cmd(Path, N, Cmd) ->
  -    lists:flatten(io_lib:format("~s ~s", [riak_repl_binpath(Path, N), Cmd])).
   
   riakcs_home(Prefix, N) ->
       io_lib:format("~s/dev/dev~b/", [Prefix, N]).
  
positive.code: 
  update_cs_config(Prefix, N, Config, {_,_} = AdminCred) ->
      update_cs_config(Prefix, N, Config, fun(_,Config0,_) -> Config0 end, AdminCred);
  update_cs_config(Prefix, N, Config, ConfigFun) when is_function(ConfigFun) ->
      update_cs_config1(Prefix, N, Config, ConfigFun).
  
  update_cs_config(Prefix, N, Config, ConfigFun, {AdminKey, AdminSecret}) ->
      CSSection = proplists:get_value(riak_cs, Config),
      UpdConfig = [{riak_cs, update_admin_creds(CSSection, AdminKey, AdminSecret)} |
                   proplists:delete(riak_cs, Config)],
      update_cs_config1(Prefix, N, UpdConfig, ConfigFun).
  
  update_cs_config1(Prefix, N, Config, ConfigFun) ->
      CSSection = proplists:get_value(riak_cs, Config),
      UpdConfig0 = [{riak_cs, update_cs_port(CSSection, N)} |
                    proplists:delete(riak_cs, Config)],
      UpdConfig = ConfigFun(cs, UpdConfig0, N),
      update_app_config(riakcs_etcpath(Prefix, N), UpdConfig).
  
  update_admin_creds(Config, AdminKey, AdminSecret) ->
  
negative.code:     os:cmd(Cmd).
  
  enable_proxy_get(SrcN, Vsn, SinkCluster) ->
      rtdev:run_riak_repl(SrcN, get_rt_config(riak, Vsn),
                          "proxy_get enable " ++ SinkCluster).
  
  disable_proxy_get(SrcN, Vsn, SinkCluster) ->
      rtdev:run_riak_repl(SrcN, get_rt_config(riak, Vsn),
                          "proxy_get disable " ++ SinkCluster).
  
  read_config(Vsn, N, Who) ->
      Prefix = get_rt_config(Who, Vsn),
  