anchor.diff:  get_user_lib_dirs_1([Dir|DirList]) ->
       case erl_prim_loader:list_dir(Dir) of
   	{ok, Dirs} ->
  -	    {Paths,_Libs} = make_path(Dir, Dirs),
  +	    Paths = make_path(Dir, Dirs),
   	    %% Only add paths trailing with ./ebin.
   	    [P || P <- Paths, filename:basename(P) =:= "ebin"] ++
   		get_user_lib_dirs_1(DirList);
  
positive.code: %%
  make_path(BundleDir, Bundles0) ->
      Bundles = choose_bundles(Bundles0),
      make_path(BundleDir, Bundles, [], []).
  
  choose_bundles(Bundles) ->
      ArchiveExt = archive_extension(),
  
negative.code: 	    interactive ->
  		LibDir = filename:append(Root, "lib"),
  		{ok,Dirs} = erl_prim_loader:list_dir(LibDir),
  		Paths = make_path(LibDir, Dirs),
  		UserLibPaths = get_user_lib_dirs(),
  		["."] ++ UserLibPaths ++ Paths;
  	    _ ->
  