anchor.diff:      }
   
   [<Theory>]
  -[<MemberData("XmlReturningAcceptHeaderCases")>]
  +[<MemberData("XmlJsonReturningAcceptHeaderCases")>]
   let ``Get "/auto" with Accept header of "application/json; q=0.5, application/xml" returns XML object`` (config : NegotiationConfigWithExpectedResult) =
       let johnDoe =
           {
  
positive.code:         | None -> assertFailf "Result was expected to be %s" expected
          | Some ctx ->
              Assert.Equal(config.StatusCode, ctx.Response.StatusCode)
              if ctx.Response.StatusCode = 200 then
                  let body = getBody ctx
                  XmlAssert.equals expected body
                  Assert.Equal(config.ReturnContentType, ctx.Response |> getContentType)
  
negative.code:         | None -> assertFailf "Result was expected to be %s" expected
          | Some ctx ->
              Assert.Equal(config.StatusCode, ctx.Response.StatusCode)
              if ctx.Response.StatusCode = 200 && config.ReturnContentType = "application/xml; charset=utf-8" then
                  let body = getBody ctx
                  XmlAssert.equals expected body
                  Assert.Equal(config.ReturnContentType, ctx.Response |> getContentType)
  