add another test
More test cases and add lenses for HTTPStatus
Response._headers is now List[Header] (should it be Option[NonEmptyList[Header]] instead?)