anchor.diff:          let auth = Json("", [| new KeyValuePair<_, _>("Authorization", "token " + token.Value) |])
           JsonValue.Parse(GITHUB_API.At("repos", owner.Value, repo, "pulls").Get(auth).ToText()).AsArray()
   
  -    let ProcessPullRequestType prEventType =
  -        match prEventType with
  -        | Invalid i -> ClosePullRequest i
  -        | UnknownMergeability uri -> QueueMergePullRequest uri
  -        | AutoMergeable uri -> MergePullRequest uri
  -        | Skip -> DreamMessage.Ok(MimeType.JSON, "Pull request needs to be handled by a human since is not targeting an open branch or the master branch"B)
  -
       let ProcessPullRequests prs =
  -        prs |> Seq.map (fun pr -> ProcessPullRequestType <| DeterminePullRequestType pr)
  +        prs |> Seq.iter (fun pr -> pollAgent.Post(new XUri(pr?url.AsString())))
   
       let ProcessRepos (repos : string[]) =
           repos
  -        |> Seq.map (fun repo->
  +        |> Array.map (fun repo->
               try
                   logger.DebugFormat("Processing repo '{0}'", repo)
                   GetOpenPullRequests repo
               with
               | ex -> JsonValue.Parse("[]").AsArray())
  -        |> Seq.concat
  +        |> Array.concat
  +        |> Array.sortBy (fun pr -> pr?created_at.AsDateTime())
           |> ProcessPullRequests
           
       override this.Start(config : XDoc, container : ILifetimeScope, result : Result) =
  
positive.code:             None
          else
              Some configVal
              
      let DeterminePullRequestType pr =
          let pullRequestUrl = pr?url.AsString()
          if not <| OpenPullRequest(pr?state.AsString()) then
              Skip
          else if InvalidPullRequest pr then
              Invalid (new XUri(pullRequestUrl))
          else if UnknownMergeabilityPullRequest pr then
              UnknownMergeability (new XUri(pullRequestUrl))
          else if AutoMergeablePullRequest pr then
              AutoMergeable (new XUri(pullRequestUrl))
          else
              Skip
  
      let DeterminePullRequestTypeFromEvent prEvent =
          if not <| OpenPullRequest(prEvent?action.AsString()) then
  
negative.code:                     try
                          let resp = Plug.New(prUri).Get(Json("", [| new KeyValuePair<_, _>("Authorization", "token " + token.Value) |]))
                          let pr = JsonValue.Parse(resp.ToText())
                          pr |> DeterminePullRequestType |> ProcessPullRequestType
                      with e ->
                          cache.Set(prUri, retry + 1, mergeabilityTTL)
                          logger.Debug(String.Format("Something failed, will poll '{0}' meargeability status again in '{1}'", prUri, mergeabilityTTL), e)
  