From 7a0cc1f7377bf632c04271336a76837c8b99d232 Mon Sep 17 00:00:00 2001
From: Digital Data - Marlon Schreiber <m.schreiber@digitaldata.works>
Date: Wed, 6 Oct 2021 12:52:04 +0200
Subject: [PATCH] MS Init ConfigPraefix for Logging

---
 app/DD_PM_WINDREAM/ClassInit.vb | 7 ++++++-
 1 file changed, 6 insertions(+), 1 deletion(-)

diff --git a/app/DD_PM_WINDREAM/ClassInit.vb b/app/DD_PM_WINDREAM/ClassInit.vb
index d63dd9b..cd11070 100644
--- a/app/DD_PM_WINDREAM/ClassInit.vb
+++ b/app/DD_PM_WINDREAM/ClassInit.vb
@@ -16,8 +16,13 @@ Public Class ClassInit
 
     <STAThread()>
     Public Sub InitLogger()
+        Dim oConfigPrefix As String = My.Settings.UserConfig_Prefix
+        Dim oLocalUserAppDataPath As String = Application.LocalUserAppDataPath
+        If oConfigPrefix.Length > 0 Then
+            oLocalUserAppDataPath = IO.Path.Combine(oLocalUserAppDataPath, oConfigPrefix)
+        End If
         LOGCONFIG = New LogConfig(LogConfig.PathType.CustomPath,
-                                       Application.LocalUserAppDataPath & "\Log",
+                                       oLocalUserAppDataPath & "\Log",
                                         Nothing,
                                         My.Application.Info.CompanyName,
                                         My.Application.Info.ProductName)