anchor.diff:             path="",
              length=0,
              chunked_send_p,
  +           mime_type,
              timeout}).
   
   %% we spawn into the handler fun, monitors it, and waits for data chunks.
   handle(M) ->
     Self = self(),
     {Mod,Fun} = mod_get(M,handler_function),
  -  S = #s{chunked_send_p=chunked_send_p(M),
  -         timeout=mod_get(M,handler_timeout)},
     Act = fun(defer)          -> exit(defer);
              ({redirect,URL}) -> exit({redirect,URL});
              (L)              -> Self ! {self(),L}
  
positive.code:       S
    end.
  
  check_headers(Chunk) ->
    case is_headers(Chunk) of
      true -> {Chunk,""};
      false-> {[{"content-type","text/html"}],Chunk}
    end.
  
  is_headers([{_,_}|L]) -> is_headers(L);
  
negative.code:   Chunk = to_list(Chnk),
    case S#s.state of
      init ->
        {Headers,Body} = check_headers(Chunk,S),
        case S#s.chunked_send_p of
          true ->
            send_header(M,200,[{"transfer-encoding","chunked"}|Headers]),
  