diff --git a/AirportAlphabetGame/AirportAlphabetGame.fsproj b/AirportAlphabetGame/AirportAlphabetGame.fsproj index 0e3d8c1..5b7ae77 100644 --- a/AirportAlphabetGame/AirportAlphabetGame.fsproj +++ b/AirportAlphabetGame/AirportAlphabetGame.fsproj @@ -23,4 +23,23 @@ + + + Always + + + Always + + + Always + + + + + + + Always + + + diff --git a/AirportAlphabetGame/AirportAlphabetGame.fsproj.user b/AirportAlphabetGame/AirportAlphabetGame.fsproj.user index 983ecfc..f41c3c5 100644 --- a/AirportAlphabetGame/AirportAlphabetGame.fsproj.user +++ b/AirportAlphabetGame/AirportAlphabetGame.fsproj.user @@ -2,6 +2,7 @@ http + C:\Users\dredgy\RiderProjects\AirportAlphabetGame\AirportAlphabetGame\Properties\PublishProfiles\FolderProfile.pubxml ProjectDebugger diff --git a/AirportAlphabetGame/Program.fs b/AirportAlphabetGame/Program.fs index db5b7d7..a707b76 100644 --- a/AirportAlphabetGame/Program.fs +++ b/AirportAlphabetGame/Program.fs @@ -7,10 +7,6 @@ open Types module Program = - let pipeline = pipeline { - use_warbler - } - let router = router { not_found_handler (setStatusCode 404 >=> text "404") get "/" ( (View.index [||]) |> htmlView) @@ -23,7 +19,6 @@ module Program = } let ServiceConfig (services: IServiceCollection) = services.AddHttpContextAccessor() - let ipAddress = System.Net.Dns.GetHostEntry(System.Net.Dns.GetHostName()).AddressList[2]; let app = application { use_mime_types [(".woff", "application/font-woff")] @@ -34,5 +29,4 @@ module Program = url "http://*:5001" } - app.Properties["host.AppMode"] <- "development" run app diff --git a/AirportAlphabetGame/View.fs b/AirportAlphabetGame/View.fs index 305d170..461f5ca 100644 --- a/AirportAlphabetGame/View.fs +++ b/AirportAlphabetGame/View.fs @@ -1,4 +1,4 @@ -module View +module View open System open Htmx