anchor.diff:          Url = ""
           User = ""
           Password = ""
  -        TimeOut = TimeSpan.FromMinutes 1.0
  +        TimeOut = TimeSpan.FromMinutes 10.0
           ToolDirectory = currentDirectory @@ "tools" @@ "Dynamics.CRM.SolutionExchanger"
           WorkingDirectory = ""
           FileName = ""
  
positive.code:     traceStartTask "Publish All" ""
      let parameters = setParams DynamicsCrmHelperDefaults
      let tool = parameters.ToolDirectory @@ "Dynamics.CRM.SolutionExchanger.exe"
      let args = sprintf "Publish /url:%s /user:%s /password:%s" parameters.Url parameters.User parameters.Password
      if 0 <> ExecProcess (fun pInfo -> 
                  pInfo.FileName <- tool
                  pInfo.WorkingDirectory <- parameters.WorkingDirectory
  
negative.code:     let parameters = setParams DynamicsCrmHelperDefaults
      traceStartTask "Importing Solution" parameters.FileName
      let tool = parameters.ToolDirectory @@ "Dynamics.CRM.SolutionExchanger.exe"
      let args = sprintf "Import /url:%s /user:%s /password:%s /filename:%s /timeout:%i" 
                      parameters.Url parameters.User parameters.Password parameters.FileName (int parameters.TimeOut.TotalMinutes)
      if 0 <> ExecProcess (fun pInfo -> 
                  pInfo.FileName <- tool
                  pInfo.WorkingDirectory <- parameters.WorkingDirectory
  