anchor.diff:          let! asset = Async.AwaitTask <| draft'.Client.Release.UploadAsset(draft'.DraftRelease, assetUpload)
           printfn "Uploaded %s" asset.Name
           return draft'
  -    }
  +    } |> retry 5
   
   let releaseDraft (draft : Async<Draft>) = 
       async { 
  
positive.code:       Project : string
        DraftRelease : Release }
  
  let createClient user password = 
      async { 
          let github = new GitHubClient(new ProductHeaderValue("FAKE"))
  
negative.code:                  Owner = owner
                   Project = project
                   DraftRelease = draft }
      } |> retry 5
  
  let uploadFile fileName (draft : Async<Draft>) = 
      async { 
  