From 5219abfb4b42caf19327740c5df621feec4c42b6 Mon Sep 17 00:00:00 2001 From: Sven van Heugten Date: Sat, 3 Jan 2026 19:55:51 +0100 Subject: [PATCH] Fix incorrect namespaces --- NightLight.Core/Configuration.fs | 6 +++--- NightLight.Core/Core.fs | 16 ++++++++-------- NightLight.Core/Lights.fs | 4 ++-- NightLight.Core/Models.fs | 2 +- NightLight.Core/Moods.fs | 4 ++-- NightLight.Core/PartsOfDay.fs | 2 +- NightLight.Core/ZigbeeCommands.fs | 6 +++--- NightLight.Core/ZigbeeEvents.fs | 4 ++-- NightLight/Program.fs | 4 ++-- 9 files changed, 24 insertions(+), 24 deletions(-) diff --git a/NightLight.Core/Configuration.fs b/NightLight.Core/Configuration.fs index 6f50b26..6658ec7 100644 --- a/NightLight.Core/Configuration.fs +++ b/NightLight.Core/Configuration.fs @@ -1,7 +1,7 @@ -module internal NightLight.Configuration +module internal NightLight.Core.Configuration -open NightLight.Moods -open NightLight.Lights +open NightLight.Core.Moods +open NightLight.Core.Lights let getDesiredColorAndBrightness bulb mood = let white = ColorByCoordinates(0.3227, 0.329) diff --git a/NightLight.Core/Core.fs b/NightLight.Core/Core.fs index 4a5ed2f..2b1cc3b 100644 --- a/NightLight.Core/Core.fs +++ b/NightLight.Core/Core.fs @@ -1,12 +1,12 @@ -module NightLight.Core +module NightLight.Core.Core -open NightLight.Models -open NightLight.PartsOfDay -open NightLight.ZigbeeEvents -open NightLight.ZigbeeCommands -open NightLight.Moods -open NightLight.Lights -open NightLight.Configuration +open NightLight.Core.Models +open NightLight.Core.PartsOfDay +open NightLight.Core.ZigbeeEvents +open NightLight.Core.ZigbeeCommands +open NightLight.Core.Moods +open NightLight.Core.Lights +open NightLight.Core.Configuration open FsToolkit.ErrorHandling let internal tryFindLight friendlyName = diff --git a/NightLight.Core/Lights.fs b/NightLight.Core/Lights.fs index be03dbf..c68d96d 100644 --- a/NightLight.Core/Lights.fs +++ b/NightLight.Core/Lights.fs @@ -1,6 +1,6 @@ -module internal NightLight.Lights +module internal NightLight.Core.Lights -open NightLight.Moods +open NightLight.Core.Moods type Bulb = | IkeaBulb diff --git a/NightLight.Core/Models.fs b/NightLight.Core/Models.fs index f8068bf..35736b0 100644 --- a/NightLight.Core/Models.fs +++ b/NightLight.Core/Models.fs @@ -1,4 +1,4 @@ -module NightLight.Models +module NightLight.Core.Models open System diff --git a/NightLight.Core/Moods.fs b/NightLight.Core/Moods.fs index c9c8d44..bf24695 100644 --- a/NightLight.Core/Moods.fs +++ b/NightLight.Core/Moods.fs @@ -1,6 +1,6 @@ -module internal NightLight.Moods +module internal NightLight.Core.Moods -open NightLight.PartsOfDay +open NightLight.Core.PartsOfDay type Mood = | White diff --git a/NightLight.Core/PartsOfDay.fs b/NightLight.Core/PartsOfDay.fs index b98aa7a..8cfc3c3 100644 --- a/NightLight.Core/PartsOfDay.fs +++ b/NightLight.Core/PartsOfDay.fs @@ -1,4 +1,4 @@ -module internal NightLight.PartsOfDay +module internal NightLight.Core.PartsOfDay open System diff --git a/NightLight.Core/ZigbeeCommands.fs b/NightLight.Core/ZigbeeCommands.fs index 12cdb46..ef8c4c8 100644 --- a/NightLight.Core/ZigbeeCommands.fs +++ b/NightLight.Core/ZigbeeCommands.fs @@ -1,8 +1,8 @@ -module internal NightLight.ZigbeeCommands +module internal NightLight.Core.ZigbeeCommands open System.Text.Json.Nodes -open NightLight.Models -open NightLight.Lights +open NightLight.Core.Models +open NightLight.Core.Lights let generateZigbeeCommand friendlyName targetColor targetBrightness = let commandObj = JsonObject() diff --git a/NightLight.Core/ZigbeeEvents.fs b/NightLight.Core/ZigbeeEvents.fs index b0f9d76..b435698 100644 --- a/NightLight.Core/ZigbeeEvents.fs +++ b/NightLight.Core/ZigbeeEvents.fs @@ -1,6 +1,6 @@ -module internal NightLight.ZigbeeEvents +module internal NightLight.Core.ZigbeeEvents -open NightLight.Models +open NightLight.Core.Models open FsToolkit.ErrorHandling open FSharp.Data diff --git a/NightLight/Program.fs b/NightLight/Program.fs index 0c8d153..c140173 100644 --- a/NightLight/Program.fs +++ b/NightLight/Program.fs @@ -5,8 +5,8 @@ open System.Threading.Tasks open Microsoft.Extensions.Logging open MQTTnet open MQTTnet.Protocol -open NightLight.Models -open NightLight.Core +open NightLight.Core.Models +open NightLight.Core.Core let private generateMqttMessage zigbeeCommand = MqttApplicationMessageBuilder()