anchor.diff:      Body = get_body(Req),
       Options = [{partial_download, [{window_size, ?WINDOW_SIZE},
                                      {part_size, ?PART_SIZE}]}],
  -    Resp = lhttpc:request(Host, Port, false, Path, Method, Headers, Body,
  -                          Timeout, Options),
  +    Resp = lhttpc:request(Host, Port, false, Path, Method, Headers,
  +                          Body, Timeout, Options),
       handle_resp(Resp, Req).
   
   get_body(Req) ->
  
positive.code: -define(PART_SIZE, 100000).
  -define(WINDOW_SIZE, 5).
  -define(DEF_REQ_HEADERS_FILTER, {drop, ["content-length",
                                          "transfer-encoding"]}).
  -define(DEF_RESP_HEADERS_FILTER, {drop, ["content-length",
                                           "transfer-encoding",
                                           "www-authenticate"]}).
  
negative.code: get_timeout(views, Req) ->
      Params = Req:parse_qs(),
      list_to_integer(proplists:get_value("connection_timeout", Params, "30000"));
  get_timeout(_Service, Req) ->
      case Req:get_header_value("ns-server-proxy-timeout") of
          undefined ->
              ?TIMEOUT;
          Val ->
              list_to_integer(Val)
      end.
  
  auth_token(_Service, Req) ->
      case menelaus_auth:extract_ui_auth_token(Req) of
  