   defp do_parse_header_value(values) when is_list(values),
     do: do_parse_each_header_value(values, [])
 
-  defp do_parse_header_value({{year, month, day}, {hour, minute, second},
-      microsecond}) do
-    NaiveDateTime.from_erl!({{year, month, day}, {hour, minute, second}},
-        microsecond)
+  defp do_parse_header_value({{year, month, day}, {hour, minute, second}, microsecond}) do
+    NaiveDateTime.from_erl!(
+      {{year, month, day}, {hour, minute, second}},
+      microsecond
+    )
   end
 
   defp do_parse_header_value({display_name, uri, %{} = parameters}) do
     case URI.parse(uri) do
       {:ok, uri} ->
         {display_name, uri, parameters}
+
       other ->
         other
     end

      :ok

  '''
  @spec to_response(request, integer, String.t) :: response
  def to_response(request, status_code, reason_phrase)
    when is_integer(status_code) and is_binary(reason_phrase),
    do: to_response(request, StatusLine.new(status_code, reason_phrase))

  @doc """
  Creates a local tag (48-bit random string, 8 characters long).

  `header` back.  If `header` is not present in `message`, or it is an empty
  list, `initial` is inserted as the single value of `header`.
  """
  @spec update_header_back(t, header, value | nil, (multiple_value -> multiple_value)) :: t
  def update_header_back(message, header, initial \\ nil, fun)
      when is_function(fun, 1) do
    update_header(message, header, List.wrap(initial), fn values ->
      do_update_last(values, fun)
    end)
  end

  defp do_update_last(values, fun) do
    [last | tail] = Enum.reverse(values)
    Enum.reduce(tail, [fun.(last)], fn x, acc -> [x | acc] end)
  end

  @doc """
