anchor.diff:              |> Async.Parallel
               |> Async.RunSynchronously
               |> Seq.concat
  -            |> Seq.append currentPage
  +
  +        return
  +            entriesVersions
  +            |> Seq.append linksVersions
       }
   
   /// Gets versions of the given package via OData via /Packages?$filter=Id eq 'packageId'
  
positive.code:     async { 
          // we cannot cache this
          try 
              return! followODataLink auth (sprintf "%s/FindPackagesById()?id='%s'" nugetURL package)
          with _ -> return! getAllVersionsFromNugetODataWithFilter (auth, nugetURL, package)
      }
  
  
negative.code:             | Some node -> node
              | None -> failwithf "unable to parse data from %s" url
  
          let readEntryVersion = optGetNode "properties" >> optGetNode "Version"
  
          let entriesVersions = 
              feed
              |> getNodes "entry"
              |> List.choose (fun entry -> Some entry |> readEntryVersion |> Option.map (fun node -> node.InnerText))
  
          let linksVersions = 
              feed 
              |> getNodes "link"
              |> List.filter (fun node -> node |> getAttribute "rel" = Some "next")
  