anchor.diff:              {noreply,State}
       end;
   
  -handle_cast({trace, from_server, Data}, State) ->
  -    Str = ["*** SRV -> CLI *** ", Data],
  -    file:write(State#state.tracefd, Str),
  -    tty_trace(Str, State),
  -    {noreply,  State};
  -handle_cast({trace, from_client, Data}, State) ->
  -    Str = ["*** CLI -> SRV *** ", Data],
  -    file:write(State#state.tracefd, Str),
  -    tty_trace(Str, State),
  -    {noreply, State};
  -
   handle_cast({yaws_hupped, _}, State) ->
       handle_info(minute10, State).
  -
  -
  -tty_trace(Str, State) ->
  -    case State#state.tty_trace of
  -        false ->
  -            ok;
  -        true ->
  -            io:format("~s", [binary_to_list(list_to_binary([Str]))])
  -    end.
  -
   
   
   %%----------------------------------------------------------------------
  
positive.code: %% API
  -export([accesslog/6,
           setup/2,
           open_trace/1,
           trace_traffic/2,
           trace_tty/1,
           authlog/4,
           rotate/1,
           add_sconf/1,
  
negative.code: 
  rotate(Res) ->
      gen_server:cast(?MODULE, {yaws_hupped, Res}).
  
  %% Useful for embeddded yaws when we don't want yaws to
  %% automatically wrap the logs.
  