anchor.diff:                      | true -> ()
                   ]
               loop xs
  -    
  +
           for chunk in split parameters.DegreeOfParallelism packages do
  -            let tasks = 
  +            let tasks =
                   chunk
                   |> Seq.toArray
                   |> Array.map (fun package -> async {
  -                        let pushResult = 
  -                            ExecProcess (fun info -> 
  +                        let pushResult =
  +                            ExecProcess (fun info ->
                                   info.FileName <- parameters.ToolPath
                                   info.Arguments <- sprintf "push %s%s%s file %s" url endpoint key (toParam package)) parameters.TimeOut
                           if pushResult <> 0 then failwithf "Error during pushing %s." package })
  
positive.code:       LockDependencies : bool
        ReleaseNotes : string
        BuildConfig : string
        TemplateFile : string
        ExcludedTemplates : string list
        WorkingDir : string
        OutputPath : string }
  
  /// Paket pack default parameters  
  let PaketPackDefaults() : PaketPackParams = 
      { ToolPath = (findToolFolderInSubPath "paket.exe" (currentDirectory @@ ".paket")) @@ "paket.exe"
        TimeOut = TimeSpan.FromMinutes 5.
        Version = null
  
negative.code: open System.Xml.Linq
  
  /// Paket pack parameter type
  type PaketPackParams =
      { ToolPath : string
        TimeOut : TimeSpan
        Version : string
  