Just (DetailedPullRequest {detailedPullRequestClosedAt = Nothing, detailedPullRequestCreatedAt = GithubDate {fromGithubDate = 2011-04-30 20:06:51 UTC}, detailedPullRequestUser = GithubUser {githubUserAvatarUrl = "https://secure.gravatar.com/avatar/37d5b6e62cd2ea089eb6e00f744ac60c?d=https://a248.e.akamai.net/assets.github.com%2Fimages%2Fgravatars%2Fgravatar-140.png", githubUserLogin = "timo", githubUserUrl = "https://api.github.com/users/timo", githubUserId = 25167, githubUserGravatarId = "37d5b6e62cd2ea089eb6e00f744ac60c"}, detailedPullRequestPatchUrl = "https://github.com/joeyh/ikiwiki/pull/7.patch", detailedPullRequestState = "open", detailedPullRequestNumber = 7, detailedPullRequestHtmlUrl = "https://github.com/joeyh/ikiwiki/pull/7", detailedPullRequestUpdatedAt = GithubDate {fromGithubDate = 2011-11-02 22:06:57 UTC}, detailedPullRequestBody = "i've implemented and documented here-docs and triple-single-quotes for directive parameters, like this:\r\n\r\n[[!more text=<