anchor.diff:      PrivDir = priv_dir(Conf),
       Dir = filename:join(PrivDir,"otp_9864"),
       RelDir = filename:join(?config(data_dir, Conf), "app1_app2"),
  -    LibDir1 = filename:join(RelDir, "lib1"),
  -    LibDir2 = filename:join(RelDir, "lib2"),
  +
  +    %% Copy libs to priv_dir because remove_release will remove some
  +    %% of these again, and we don't want to remove anything from
  +    %% data_dir
  +    copy_tree(Conf,filename:join(RelDir, "lib1"),Dir),
  +    copy_tree(Conf,filename:join(RelDir, "lib2"),Dir),
  +    LibDir1 = filename:join(Dir, "lib1"),
  +    LibDir2 = filename:join(Dir, "lib2"),
   
       %% Create the releases
       Rel1 = create_and_install_fake_first_release(Dir,
  
positive.code:     ok = rpc:call(Node, release_handler, install_file,
  			[RelVsn2, filename:join(Rel2Dir, "sys.config")]),
  
      %% Install RelVsn2 without {update_paths, true} option
      {ok, RelVsn1, []} =
  	rpc:call(Node, release_handler, install_release, [RelVsn2]),
  
      %% Install RelVsn1 again
      {ok, RelVsn1, []} =
  	rpc:call(Node, release_handler, install_release, [RelVsn1]),
  
      TempRel2Dir = filename:join(Dir,"releases/2"),
      file:make_symlink(TempRel2Dir, filename:join(TempRel2Dir, "foo_symlink_dir")),
  
      %% This will fail if symlinks are not handled
      ok = rpc:call(Node, release_handler, remove_release, [RelVsn2]),
  
      ok.
  
  
  upgrade_supervisor(Conf) when is_list(Conf) ->
  
negative.code:     {ok, Node} = t_start_node(otp_9864, Rel1, filename:join(Rel1Dir,"sys.config")),
      
      %% Unpack rel2 (make sure it does not work if an AppDir is bad)
      {ok, RelVsn2} =
  	rpc:call(Node, release_handler, set_unpacked,
  		 [Rel2++".rel", [{app1,"2.0",LibDir2}, {app2,"1.0",LibDir2}]]),
  