anchor.diff:                                            yaws:is_ssl(SC))
                     end
             end,
  -    ?Debug("Request data = ~s~n", [binary_to_list(un_partial(Bin))]),
  -    ARG = make_arg(CliSock, IPPort, Head, Req, Bin),
  -    handle_request(CliSock, ARG, size(un_partial(Bin))).
  +    case Res of
  +        {error, Reason} ->
  +            error_logger:format("Invalid Request: ~p~n", [Reason]),
  +            deliver_400(CliSock, Req);
  +        Bin ->
  +            ?Debug("Request data = ~s~n", [binary_to_list(un_partial(Bin))]),
  +            ARG = make_arg(CliSock, IPPort, Head, Req, Bin),
  +            handle_request(CliSock, ARG, size(un_partial(Bin)))
  +    end.
   
   
   'MKCOL'(CliSock, IPPort, Req, Head) ->
  
positive.code:               Len when PPS == nolimit ->
                    Int_len = list_to_integer(Len),
                    if
                        Int_len == 0 ->
                            <<>>;
                        true ->
  
negative.code:               Len when is_integer(PPS) ->
                    Int_len = list_to_integer(Len),
                    if
                        Int_len < 0 ->
                            {error, content_length_overflow};
                        Int_len == 0 ->
                            <<>>;
                        PPS < Int_len ->
  