removing dead code

fsprojects · Apr 3, 2015 · e1e5c4d · e1e5c4d
1 parent 68ef072
commit e1e5c4d
Showing 1 changed file with 0 additions and 11 deletions.
diff --git a/src/deploy.web/Fake.Deploy.Web/Modules/Api.Package.fs b/src/deploy.web/Fake.Deploy.Web/Modules/Api.Package.fs
@@ -22,17 +22,6 @@ type ApiPackage (dataProvider : IDataProvider) as http =
 
     let packageTemp = Path.Combine(appdata.FullName, "Package_Temp")
 
-    let deploy packageFileName agent =
-        let toStr (msgs:seq<ConsoleMessage>) = 
-            msgs |> Seq.map(fun msg -> sprintf "%s: %s" (msg.Timestamp.ToString("yyyy-MM-dd HH:mm:ss")) msg.Message )
-
-        let url = Uri(agent.Address, "/fake/")
-        let response = postDeploymentPackage url.AbsoluteUri packageFileName [||]
-        match response with
-        | Failure x -> { Agent = agent.Name; Messages = toStr x.Messages; Success = not <| x.IsError; Error = x.Exception.ToString() }
-        | Success x -> { Agent = agent.Name; Messages = toStr x.Messages; Success = not <| x.IsError; Error = "" }
-        | _ -> { Agent = agent.Name; Messages = []; Success = false; Error = "Unexpected response from agent" }
-
     do
         http.post "/rollback" (fun p ->
             let body = http.Bind<ApiModels.RollbackRequest>()