Welcome to mirror list, hosted at ThFree Co, Russian Federation.

github.com/mono/monodevelop.git - Unnamed repository; edit this file 'description' to name the repository.
summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authornosami <jasonimison@gmail.com>2018-12-10 20:28:27 +0300
committernosami <jasonimison@gmail.com>2018-12-10 20:28:27 +0300
commit87f2485f648a0e2295f45e589bfb6134722d487b (patch)
tree7ca6261f4457160bd9233ea86f8bc896abbbd8d8 /main/external/fsharpbinding
parentd1dd8bd885764786f050a097d6621b26fab689c6 (diff)
Remove dead code to fetch Template Categories
Diffstat (limited to 'main/external/fsharpbinding')
-rw-r--r--main/external/fsharpbinding/MonoDevelop.FSharp.Tests/TemplateTests.fs18
1 files changed, 3 insertions, 15 deletions
diff --git a/main/external/fsharpbinding/MonoDevelop.FSharp.Tests/TemplateTests.fs b/main/external/fsharpbinding/MonoDevelop.FSharp.Tests/TemplateTests.fs
index 39167091d8..3972966be5 100644
--- a/main/external/fsharpbinding/MonoDevelop.FSharp.Tests/TemplateTests.fs
+++ b/main/external/fsharpbinding/MonoDevelop.FSharp.Tests/TemplateTests.fs
@@ -7,7 +7,6 @@ open System.Threading.Tasks
open FsUnit
open Microsoft.FSharp.Compiler.SourceCodeServices
open MonoDevelop.Core
-open MonoDevelop.Core.ProgressMonitoring
open MonoDevelop.FSharp
open MonoDevelop.Ide
open MonoDevelop.Ide.Projects
@@ -46,14 +45,6 @@ type ``Template tests``() =
yield! category.Categories |> Seq.collect flattenCategories
}
- let solutionTemplates =
- templateService.GetProjectTemplateCategories (predicate)
- |> Seq.collect flattenCategories
- |> Seq.collect(fun c -> c.Templates)
- |> Seq.choose(fun s -> s.GetTemplate("F#") |> Option.ofObj)
- |> Seq.filter(fun t -> t.Id.IndexOf("SharedAssets") = -1) // shared assets projects can't be built standalone
- |> List.ofSeq
-
let templatesDir = UnitTests.Util.TmpDir / "fsharp-buildtemplates"
let getErrorsForProject (solution:Solution) =
@@ -123,10 +114,6 @@ type ``Template tests``() =
templateService.ProcessTemplate(template, config, sln.RootFolder)
let folder = new SolutionFolder()
- let solutionTemplate =
- solutionTemplates
- |> Seq.find(fun t -> t.Id = tt)
-
let projects = sln.Items |> Seq.filter(fun i -> i :? DotNetProject) |> Seq.cast<DotNetProject> |> List.ofSeq
// Save solution before installing NuGet packages to prevent any Imports from being added
@@ -173,9 +160,10 @@ type ``Template tests``() =
[<Test;AsyncStateMachine(typeof<Task>)>]
member x.``FSharp portable project``() =
+ let name = "FSharpPortableLibrary"
+ let projectTemplate = ProjectTemplate.ProjectTemplates |> Seq.find (fun t -> t.Id = name)
+
async {
- let name = "FSharpPortableLibrary"
- let projectTemplate = ProjectTemplate.ProjectTemplates |> Seq.find (fun t -> t.Id = name)
let dir = FilePath (templatesDir/"fsportable")
dir.Delete()
let cinfo = new ProjectCreateInformation (ProjectBasePath = dir, ProjectName = name, SolutionName = name, SolutionPath = dir)