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