anchor.diff:  html_encoding(utf8) ->
       "utf-8".
   
  -unexpected_io(Pid,ct_internal,List,#logger_state{ct_log_fd=Fd}=State) ->
  +unexpected_io(Pid,ct_internal,_Importance,List,State) ->
       IoFun = create_io_fun(Pid,State),
  -    io:format(Fd, "~ts", [lists:foldl(IoFun, [], List)]);
  -unexpected_io(Pid,_Category,List,State) ->
  +    io:format(State#logger_state.ct_log_fd, "~ts",
  +	      [lists:foldl(IoFun, [], List)]);
  +unexpected_io(Pid,Category,Importance,List,State) ->
       IoFun = create_io_fun(Pid,State),
       Data = io_lib:format("~ts", [lists:foldl(IoFun, [], List)]),
       %% if unexpected io comes in during startup or shutdown, test_server
  -    %% might not be running - if so (noproc exit), simply ignore the printout
  +    %% might not be running - if so (noproc exit), simply print to
  +    %% stdout instead (will result in double printouts when pal is used)
       try test_server_io:print_unexpected(Data) of
   	_ ->
   	    ok
       catch
  -	_:{noproc,_} -> ok;
  +	_:{noproc,_} -> tc_print(Category,Importance,Data,[]);
   	_:Reason     -> exit(Reason)
       end.
  
positive.code: 	    IoFun = create_io_fun(FromPid, State),
  	    io:format(TCGL,"~ts", [lists:foldl(IoFun, [], List)]);
         true ->
  	    unexpected_io(FromPid,Category,List,State)
      end,
      State;
  
  
negative.code: 		end;
  	   true ->
  		fun() ->
  			unexpected_io(FromPid,Category,?MAX_IMPORTANCE,
  				      List,State)
  		end
  	end,
      case State#logger_state.async_print_jobs of
  