Merge pull request #664 from JonCanning/master

Set PaketHelper ApiKey
fsprojects · Feb 24, 2015 · 7e7acee · 7e7acee
2 parents ef6d305 + 7d83d8d
commit 7e7acee
Showing 1 changed file with 5 additions and 3 deletions.
diff --git a/src/app/FakeLib/PaketHelper.fs b/src/app/FakeLib/PaketHelper.fs
@@ -32,15 +32,15 @@ type PaketPushParams =
       TimeOut : TimeSpan
       PublishUrl : string
       WorkingDir : string
-      AccessKey : string }
+      ApiKey : string }
 
 /// Paket push default parameters
 let PaketPushDefaults() : PaketPushParams = 
     { ToolPath = (findToolFolderInSubPath "paket.exe" (currentDirectory @@ ".paket")) @@ "paket.exe"
       TimeOut = TimeSpan.FromMinutes 5.
       PublishUrl = "https://nuget.org"
       WorkingDir = "."
-      AccessKey = null }
+      ApiKey = null }
 
 /// Creates a new NuGet package by using Paket pack on all paket.template files in the working directory.
 /// ## Parameters
@@ -77,6 +77,8 @@ let Push setParams =
         let pushResult = 
             ExecProcess (fun info -> 
                 info.FileName <- parameters.ToolPath
-                info.Arguments <- sprintf "push url %s file %s" parameters.PublishUrl package) System.TimeSpan.MaxValue
+                info.Arguments <- sprintf "push url %s file %s" parameters.PublishUrl package
+                if parameters.ApiKey <> null then
+                  info.Arguments <- sprintf "%s apikey %s" info.Arguments parameters.ApiKey) System.TimeSpan.MaxValue
         if pushResult <> 0 then failwithf "Error during pushing %s." package
     traceEndTask "PaketPush" (separated ", " packages)