anchor.diff:      Bin.
   
   
  -call_method(Method, CliSock, Req, H) ->
  +call_method(Method, CliSock, IPPort, Req, H) ->
       case Method of
           F when is_atom(F) ->
  -            ?MODULE:F(CliSock, Req, H);
  +            ?MODULE:F(CliSock, IPPort, Req, H);
           L when is_list(L) ->
  -            handle_extension_method(L, CliSock, Req, H)
  -    end.
  -
  -
  -'HEAD'(CliSock, Req, Head) ->
  +            handle_extension_method(L, CliSock, IPPort, Req, H)
  +    end.
  +
  +
  +'HEAD'(CliSock, IPPort, Req, Head) ->
       put(acc_content, discard),
  -    no_body_method(CliSock, Req, Head).
  -
  -not_implemented(CliSock, Req, Head) ->
  +    no_body_method(CliSock, IPPort, Req, Head).
  +
  +not_implemented(CliSock, _IPPort, Req, Head) ->
       SC=get(sc),
       ok = yaws:setopts(CliSock, [{packet, raw}, binary], yaws:is_ssl(SC)),
       flush(CliSock, Head#headers.content_length),
       deliver_501(CliSock, Req).
   
   
  -'TRACE'(CliSock, Req, Head) ->
  -    not_implemented(CliSock, Req, Head).
  -
  -'OPTIONS'(CliSock, Req, Head) ->
  +'TRACE'(CliSock, IPPort, Req, Head) ->
  +    not_implemented(CliSock, IPPort, Req, Head).
  +
  +'OPTIONS'(CliSock, IPPort, Req, Head) ->
       case Req#http_request.path of
           '*' ->
               % Handle "*" as per RFC2616 section 5.1.2
               deliver_options(CliSock, Req, ['GET', 'HEAD', 'OPTIONS',
                                              'PUT', 'POST', 'DELETE']);
           _ ->
  -            no_body_method(CliSock, Req, Head)
  -    end.
  -
  -'PUT'(CliSock, Req, Head) ->
  +            no_body_method(CliSock, IPPort, Req, Head)
  +    end.
  +
  +'PUT'(CliSock, IPPort, Req, Head) ->
       ?Debug("PUT Req=~p~n H=~p~n", [?format_record(Req, http_request),
                                      ?format_record(Head, headers)]),
  -    body_method(CliSock, Req, Head).
  -
  -'DELETE'(CliSock, Req, Head) ->
  -    no_body_method(CliSock, Req, Head).
  -
  -'PATCH'(CliSock, Req, Head) ->
  +    body_method(CliSock, IPPort, Req, Head).
  +
  +
  +'DELETE'(CliSock, IPPort, Req, Head) ->
  +    no_body_method(CliSock, IPPort, Req, Head).
  +
  +'PATCH'(CliSock, IPPort, Req, Head) ->
       ?Debug("PATCH Req=~p~n H=~p~n", [?format_record(Req, http_request),
                                        ?format_record(Head, headers)]),
  -    body_method(CliSock, Req, Head).
  +    body_method(CliSock, IPPort, Req, Head).
   
   %%%
   %%% WebDav specifics: PROPFIND, MKCOL,....
   %%%
  -'PROPFIND'(CliSock, Req, Head) ->
  +'PROPFIND'(CliSock, IPPort, Req, Head) ->
       %%?elog("PROPFIND Req=~p H=~p~n",
       %%                   [?format_record(Req, http_request),
       %%                    ?format_record(Head, headers)]),
  -    body_method(CliSock, Req, Head).
  -
  -'MOVE'(CliSock, Req, Head) ->
  -    no_body_method(CliSock, Req, Head).
  -
  -'COPY'(CliSock, Req, Head) ->
  -    no_body_method(CliSock, Req, Head).
  -
  -
  -body_method(CliSock, Req, Head) ->
  +    body_method(CliSock, IPPort, Req, Head).
  +
  +'MOVE'(CliSock, IPPort, Req, Head) ->
  +    no_body_method(CliSock, IPPort, Req, Head).
  +
  +'COPY'(CliSock, IPPort, Req, Head) ->
  +    no_body_method(CliSock, IPPort, Req, Head).
  +
  +
  +body_method(CliSock, IPPort, Req, Head) ->
       SC=get(sc),
       ok = yaws:setopts(CliSock, [{packet, raw}, binary], yaws:is_ssl(SC)),
       PPS = SC#sconf.partial_post_size,
  
positive.code:             put(sc, SC#sconf{appmods = []}),
              check_keepalive_maxuses(GS, Num),
              Call = call_method(Req#http_request.method,
                                 CliSock,
                                 Req#http_request{path = {abs_path, Page}},
                                 H#headers{content_length = undefined}),
              Call2 = fix_keepalive_maxuses(Call),
              handle_method_result(Call2, CliSock, IP, GS, Req, H, Num)
      end.
  
  
  peername(CliSock, ssl) ->
      ssl:peername(CliSock);
  peername(CliSock, nossl) ->
      inet:peername(CliSock).
  
  
  deepforeach(_F, []) ->
  
negative.code:     case yaws:to_lower(Continue) of
          "100-continue" ->
              deliver_100(CliSock),
              body_method(CliSock, IPPort, Req, Head);
          _ ->
              body_method(CliSock, IPPort, Req, Head)
      end.
  
  
  