anchor.diff:  			end
   		end,
   	    if Importance >= (100-VLvl) ->
  +		    CtLogFd = State#logger_state.ct_log_fd,
   		    case get_groupleader(Pid, GL, State) of
   			{tc_log,TCGL,TCGLs} ->
   			    case erlang:is_process_alive(TCGL) of
  
positive.code: print_to_log(sync, FromPid, Category, TCGL, List, State) ->
      %% in some situations (exceptions), the printout is made from the
      %% test server IO process and there's no valid group leader to send to
      if FromPid /= TCGL ->
  	    IoFun = create_io_fun(FromPid, State),
  	    io:format(TCGL,"~ts", [lists:foldl(IoFun, [], List)]);
         true ->
  	    unexpected_io(FromPid,Category,?MAX_IMPORTANCE,List,State)
      end,
      State;
  
  print_to_log(async, FromPid, Category, TCGL, List, State) ->
      %% in some situations (exceptions), the printout is made from the
      %% test server IO process and there's no valid group leader to send to
      Printer =
  	if FromPid /= TCGL ->
  		IoFun = create_io_fun(FromPid, State),
  		fun() ->
  			test_server:permit_io(TCGL, self()),
  
  
negative.code: 	    ok
      end.
  
  create_io_fun(FromPid, CtLogFd) ->
      %% we have to build one io-list of all strings
      %% before printing, or other io printouts (made in
      %% parallel) may get printed between this header 
      %% and footer
      fun({Str,Args}, IoList) ->
  	    case catch io_lib:format(Str,Args) of
  		{'EXIT',_Reason} ->
  		    io:format(CtLogFd, "Logging fails! Str: ~p, Args: ~p~n",
  			      [Str,Args]),
  		    %% stop the testcase, we need to see the fault
  		    exit(FromPid, {log_printout_error,Str,Args}),
  