anchor.diff:      end.
   
   is_chunked(Hdrs) ->
  -    case header_value("transfer-encoding", Hdrs) of
  -        undefined -> false;
  -        _ -> true %% chunked is mandatory with Transfer-Enncoding
  +    TransferEncoding = string:to_lower(
  +        header_value("transfer-encoding", Hdrs, "undefined")),
  +    case TransferEncoding of
  +        "chunked" -> true;
  +        _ -> false
       end.
   
   -spec dec(timeout()) -> timeout().
  
positive.code: add_content_headers("PUT", Hdrs, Body, PartialUpload) ->
      add_content_headers(Hdrs, Body, PartialUpload);
  add_content_headers(_, Hdrs, _, _PartialUpload) ->
      Hdrs. %%TODO:No body here or need to be explicitly specified???
  
  add_content_headers(Hdrs, Body, false) ->
      case header_value("content-length", Hdrs) of
  
negative.code:          header_value("transfer-encoding", Hdrs)} of
          {undefined, undefined} ->
              [{"Transfer-Encoding", "chunked"} | Hdrs];
          {undefined, TransferEncoding} ->
              case string:to_lower(TransferEncoding) of
              "chunked" -> Hdrs;
              _ -> erlang:error({error, unsupported_transfer_encoding})
              end;
          {_Length, undefined} ->
              Hdrs;
          {_Length, _TransferEncoding} -> %% have both cont.length and chunked 
  