anchor.diff:  priv_dir(Config) ->
       ?config(priv_dir, Config).
   
  -node_dir(N, Config) ->
  -    filename:join(priv_dir(Config), N).
  +%% node_dir(N, Config) ->
  +%%     filename:join(priv_dir(Config), N).
  +
  +make_shortcut(Config) ->
  +    PrivDir  = priv_dir(Config),
  +    Shortcut = shortcut_dir(Config),
  +    delete_file(Shortcut),
  +    ok = file:make_symlink(PrivDir, Shortcut),
  +    ct:log("Made symlink ~s to ~s", [PrivDir, Shortcut]),
  +    ok.
  +
  +delete_file(F) ->
  +    case file:delete(F) of
  +        ok -> ok;
  +        {error, enoent} -> ok;
  +        Other ->
  +            erlang:error(Other, [F])
  +    end.
  +
  +node_shortcut(N, Config) ->
  +    filename:join(shortcut_dir(Config), N).
  +
  +shortcut_dir(Config) ->
  +    Top = ?config(top_dir, Config),
  +    filename:join(Top, "_build/test/logs/latest.sync").
  +
   
   data_dir(N, Config) ->
  -    filename:join(node_dir(N, Config), "data").
  +    filename:join(node_shortcut(N, Config), "data").
   
   keys_dir(N, Config) ->
       filename:join(data_dir(N, Config), "keys").
  
positive.code: %%         end,
  %%     lists:keystore(setup, 1, Terms, Setup).
  
  copy_files(Ops) ->
      lists:map(
        fun({ln, From, To}) ->
                file:make_symlink(From, To);
           ({cp, From, To}) ->
                cmd(["cp -r ", From, " ", To])
        end, Ops).
  
  cmd(C) ->
      Cmd = binary_to_list(iolist_to_binary(C)),
  
negative.code:     start_node_(dev1, Config),
      connect(node_(dev1)),
      ok.
  
  test_subscription(_Config) ->
      N = node_(dev1),
      subscribe(N, app_started),
      Debug0 = call_proxy(N, debug),
      ct:log("After subscription (~p, app_started): ~p", [self(), Debug0]),
      true = rpc:call(N, setup, patch_app, [sasl]),
      {ok, _} = rpc:call(N, setup, reload_app, [sasl]),
      ok = rpc:call(N, application, start, [sasl]),
      receive
          {app_started, #{info := sasl}} ->
              ct:log("got app_started: sasl", []),
              ok
      after 1000 ->
              Debug = call_proxy(N, debug),
              Since = events_since(N, app_started, 0),
              ct:log("Debug = ~p~n"
                     "Since = ~p", [Debug, Since]),
              ok
      end.
  
  mine_on_first(_Config) ->
      N = node_(dev1),
  