@@ -126,8 +126,11 @@ spec = describe "Servant.Docs" $ do
126 it "mentions headers" $ do
126 it "mentions headers" $ do
127 md `shouldContain` "- This endpoint is sensitive to the value of the **X-Test** HTTP header."
127 md `shouldContain` "- This endpoint is sensitive to the value of the **X-Test** HTTP header."
129− it "contains response samples" $
129+ it "contains response samples - dt1field1" $
130− md `shouldContain` "{\"dt1field1\":\"field 1\",\"dt1field2\":13}"
130+ md `shouldContain` "\"dt1field1\":\"field 1\""
131+ it "contains response samples - dt1field2" $
132+ md `shouldContain` "\"dt1field2\":13"
131 it "contains request body samples" $
134 it "contains request body samples" $
132 md `shouldContain` "17"
135 md `shouldContain` "17"