anchor.diff:      { ToolPath = findToolFolderInSubPath "paket.exe" (currentDirectory @@ ".paket" @@ "paket.exe")
         TimeOut = TimeSpan.FromMinutes 5.
         PublishUrl = "https://nuget.org"
  +      WorkingDir = "."
         AccessKey = null }
   
  -/// Creates a new NuGet package by using Paket pack on all paket.template files in the given root directory.
  +/// Creates a new NuGet package by using Paket pack on all paket.template files in the working directory.
   /// ## Parameters
   /// 
   ///  - `setParams` - Function used to manipulate the default parameters.
  -///  - `rootDir` - The paket.template files.
  -let Pack setParams rootDir = 
  -    traceStartTask "PaketPack" rootDir
  +let Pack setParams =     
       let parameters : PaketPackParams = PaketPackDefaults() |> setParams
  -    
  +    traceStartTask "PaketPack" parameters.WorkingDir
  +
       let xmlEncode (notEncodedText : string) = 
           if System.String.IsNullOrWhiteSpace notEncodedText then ""
           else XText(notEncodedText).ToString().Replace("ß", "&szlig;")
  
positive.code:             info.Arguments <- sprintf "pack output %s version \"%s\" releaseNotes \"%s\"" parameters.OutputPath 
                                    parameters.Version (xmlEncode parameters.ReleaseNotes)) parameters.TimeOut
      
      if packResult <> 0 then failwithf "Error during packing %s." rootDir
      traceEndTask "PaketPack" rootDir
  
  /// Pushes a NuGet package to the server by using Paket push.
  /// ## Parameters
  /// 
  ///  - `setParams` - Function used to manipulate the default parameters.
  ///  - `packages` - The .nupkg files.
  let Push setParams packages = 
      let packages = Seq.toList packages
      traceStartTask "PaketPush" (separated ", " packages)
      let parameters : PaketPushParams = PaketPushDefaults() |> setParams
      for package in packages do
          let pushResult = 
              ExecProcess (fun info -> 
  
negative.code:     { ToolPath : string
        TimeOut : TimeSpan
        PublishUrl : string
        WorkingDir : string
        AccessKey : string }
  
  /// Paket push default parameters
  