anchor.diff:      LogInfo = [{topdir,Dir},{rundir,lists:flatten(TestDir1)}],
       test_server_sup:framework_call(report, [loginfo,LogInfo]),
       {ok,TestDir1}.
  +
  +log_file_error(Error, Dir) ->
  +    exit({cannot_create_log_dir,{Error,lists:flatten(Dir)}}).
   
   make_html_link(LinkName, Target, Explanation) ->
       %% if possible use a relative reference to Target.
  
positive.code: 	{error, eexist} ->
  	    ok;
  	MkDirError ->
  	    exit({cant_create_log_dir,{MkDirError,Dir}})
      end,
      TestDir = timestamp_filename_get(filename:join(Dir, "run.")),
      TestDir1 =
  
negative.code: 		    ok ->
  			TestDirX;
  		    MkDirError2 ->
  			log_file_error(MkDirError2, TestDirX)
  		end;
  	    MkDirError2 ->
  		log_file_error(MkDirError2, TestDir)
  	end,
      ok = file:write_file(filename:join(Dir, ?last_file), TestDir1 ++ "\n"),
      ok = file:write_file(?last_file, TestDir1 ++ "\n"),
  