diff options
author | nosami <jasonimison@gmail.com> | 2018-12-10 20:28:27 +0300 |
---|---|---|
committer | nosami <jasonimison@gmail.com> | 2018-12-10 20:28:27 +0300 |
commit | 87f2485f648a0e2295f45e589bfb6134722d487b (patch) | |
tree | 7ca6261f4457160bd9233ea86f8bc896abbbd8d8 /main/external/fsharpbinding | |
parent | d1dd8bd885764786f050a097d6621b26fab689c6 (diff) |
Remove dead code to fetch Template Categories
Diffstat (limited to 'main/external/fsharpbinding')
-rw-r--r-- | main/external/fsharpbinding/MonoDevelop.FSharp.Tests/TemplateTests.fs | 18 |
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) |