anchor.diff:  %% @spec (BuildRef, RepoDir, AppName, Vsn) -> ok
   %% @end
   %%--------------------------------------------------------------------
  -send_path(BuildRef, RepoDir, AppName, Vsn) ->
  +send_path(BuildRef, AppName, AppPath) ->
       NAppName = case is_atom(AppName) of
                      true ->
                          atom_to_list(AppName);
  
positive.code: make_shell(BuildRef, ProjectApps, ProjectRepoApps, Repo) ->
      BuildDir = sin_build_config:get_value(BuildRef, "build.dir"),
      AppDir = filename:join([BuildDir, "apps"]),
      send_paths(BuildRef, AppDir, ProjectApps),
      send_paths(BuildRef, Repo, ProjectRepoApps).
  
  
  %%--------------------------------------------------------------------
  
negative.code: %% @spec (BuildRef, AppDir, DirList) -> Paths
  %% @end
  %%--------------------------------------------------------------------
  send_paths(BuildRef, [{AppName, _Vsn, _Deps, AppPath} | T]) ->
    send_path(BuildRef, AppName, AppPath),
    send_paths(BuildRef, T);
  send_paths(_, []) ->
      ok.
  
  %%--------------------------------------------------------------------
  