anchor.diff:      if FromPid /= TCGL ->
   	    IoFun = create_io_fun(FromPid, CtLogFd, EscChars),
   	    IoList = lists:foldl(IoFun, [], Content),
  -	    try io:format(TCGL,["$tc_html","~ts"], [IoList]) of
  +	    try tc_io_format(TCGL, "~ts", [IoList]) of
   		ok -> ok
   	    catch
   		_:_ ->
  
positive.code: 	    %% make sure no IO for this test case from the
  	    %% CT logger gets rejected
  	    test_server:permit_io(GL, self()),
  	    print_style(GL,GL,State#logger_state.stylesheet),
  	    set_evmgr_gl(GL),
  	    TCGLs = add_tc_gl(TCPid,GL,State),
  	    if not RefreshLog ->
  
negative.code: 
  			case erlang:is_process_alive(TCGL) of
  			    true ->
  				try tc_io_format(TCGL, "~ts",
  					      [lists:foldl(IoFun,[],Content)]) of
  				    _ -> ok
  				catch
  