Remove unnecessary code from F# templates (#46443)

dotnet · Feb 8, 2023 · f58f954 · f58f954
1 parent 287d7ea
commit f58f954
Show file tree

Hide file tree

Showing 7 changed files with 6 additions and 42 deletions.
diff --git a/src/ProjectTemplates/Web.ProjectTemplates/content/EmptyWeb-FSharp/Program.fs b/src/ProjectTemplates/Web.ProjectTemplates/content/EmptyWeb-FSharp/Program.fs
@@ -1,6 +1,5 @@
 open System
 open Microsoft.AspNetCore.Builder
-open Microsoft.Extensions.Hosting
 
 [<EntryPoint>]
 let main args =

diff --git a/...ectTemplates/Web.ProjectTemplates/content/StarterWeb-FSharp/Controllers/HomeController.fs b/...ectTemplates/Web.ProjectTemplates/content/StarterWeb-FSharp/Controllers/HomeController.fs
@@ -1,17 +1,10 @@
-namespace Company.WebApplication1.Controllers
+namespace Company.WebApplication1.Controllers
 
-open System
-open System.Collections.Generic
-open System.Linq
-open System.Threading.Tasks
 open System.Diagnostics
-
 open Microsoft.AspNetCore.Mvc
-open Microsoft.Extensions.Logging
-
 open Company.WebApplication1.Models
 
-type HomeController (logger : ILogger<HomeController>) =
+type HomeController () =
     inherit Controller()
 
     member this.Index () =
@@ -22,7 +15,7 @@ type HomeController (logger : ILogger<HomeController>) =
 
     [<ResponseCache(Duration = 0, Location = ResponseCacheLocation.None, NoStore = true)>]
     member this.Error () =
-        let reqId = 
+        let reqId =
             if isNull Activity.Current then
                 this.HttpContext.TraceIdentifier
             else

diff --git a/src/ProjectTemplates/Web.ProjectTemplates/content/StarterWeb-FSharp/Program.fs b/src/ProjectTemplates/Web.ProjectTemplates/content/StarterWeb-FSharp/Program.fs
@@ -2,21 +2,12 @@ namespace Company.WebApplication1
 
 #nowarn "20"
 
-open System
-open System.Collections.Generic
-open System.IO
-open System.Linq
-open System.Threading.Tasks
-open Microsoft.AspNetCore
 open Microsoft.AspNetCore.Builder
-open Microsoft.AspNetCore.Hosting
 #if !NoHttps
 open Microsoft.AspNetCore.HttpsPolicy
 #endif
-open Microsoft.Extensions.Configuration
 open Microsoft.Extensions.DependencyInjection
 open Microsoft.Extensions.Hosting
-open Microsoft.Extensions.Logging
 
 module Program =
     let exitCode = 0

diff --git a/...lates/Web.ProjectTemplates/content/WebApi-FSharp/Controllers/WeatherForecastController.fs b/...lates/Web.ProjectTemplates/content/WebApi-FSharp/Controllers/WeatherForecastController.fs
@@ -1,11 +1,7 @@
-namespace Company.WebApplication1.Controllers
+namespace Company.WebApplication1.Controllers
 
 open System
-open System.Collections.Generic
-open System.Linq
-open System.Threading.Tasks
 open Microsoft.AspNetCore.Mvc
-open Microsoft.Extensions.Logging
 open Company.WebApplication1
 
 [<ApiController>]

diff --git a/src/ProjectTemplates/Web.ProjectTemplates/content/WebApi-FSharp/Program.fs b/src/ProjectTemplates/Web.ProjectTemplates/content/WebApi-FSharp/Program.fs
@@ -1,20 +1,11 @@
 namespace Company.WebApplication1
 #nowarn "20"
-open System
-open System.Collections.Generic
-open System.IO
-open System.Linq
-open System.Threading.Tasks
-open Microsoft.AspNetCore
+
 open Microsoft.AspNetCore.Builder
-open Microsoft.AspNetCore.Hosting
 #if !NoHttps
 open Microsoft.AspNetCore.HttpsPolicy
 #endif
-open Microsoft.Extensions.Configuration
 open Microsoft.Extensions.DependencyInjection
-open Microsoft.Extensions.Hosting
-open Microsoft.Extensions.Logging
 
 module Program =
     let exitCode = 0

diff --git a/src/ProjectTemplates/Web.ProjectTemplates/content/Worker-FSharp/Program.fs b/src/ProjectTemplates/Web.ProjectTemplates/content/Worker-FSharp/Program.fs
@@ -1,9 +1,5 @@
 namespace Company.Application1
 
-open System
-open System.Collections.Generic
-open System.Linq
-open System.Threading.Tasks
 open Microsoft.Extensions.DependencyInjection
 open Microsoft.Extensions.Hosting
 
@@ -17,4 +13,4 @@ module Program =
     let main args =
         createHostBuilder(args).Build().Run()
 
-        0 // exit code
+        0 // exit code
diff --git a/src/ProjectTemplates/Web.ProjectTemplates/content/Worker-FSharp/Worker.fs b/src/ProjectTemplates/Web.ProjectTemplates/content/Worker-FSharp/Worker.fs
@@ -1,8 +1,6 @@
 namespace Company.Application1
 
 open System
-open System.Collections.Generic
-open System.Linq
 open System.Threading
 open System.Threading.Tasks
 open Microsoft.Extensions.Hosting