Version 2.4.6.4

app/TaskFlow/ClassInit.vb

@@ -12,11 +12,7 @@ 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,
                                        oLocalUserAppDataPath & "\Log",
                                         Nothing,
@@ -46,23 +42,8 @@ Public Class ClassInit
     Public Sub InitUserConfig()
         Try
             Dim oUserAppDataPath As String = Application.UserAppDataPath
-            Dim oLegacyAppDataPath As String = Application.UserAppDataPath
             Dim oCommonAppDataPath = Application.CommonAppDataPath
             Dim oStartupPath = Application.StartupPath
-            Dim oConfigPrefix As String = My.Settings.UserConfig_Prefix
-
-            ' If prefix is configured, use it to create a subfolder in app data and migrate existing data
-            If oConfigPrefix.Length > 0 Then
-                oUserAppDataPath = IO.Path.Combine(Application.UserAppDataPath, oConfigPrefix)
-
-                Dim oConfigUtils As New ConfigUtils(LOGCONFIG)
-
-                If oConfigUtils.TestMigrationNeeded(oUserAppDataPath) Then
-                    LOGCONFIG.Debug = True
-                    oConfigUtils.MigrateConfig(oLegacyAppDataPath, oUserAppDataPath)
-                    LOGCONFIG.Debug = False
-                End If
-            End If
 
             ' If AppConfig from Startup Path should be forced, rewrite the common app data path
             If My.Settings.UseAppConfigConString = True Then

app/TaskFlow/My Project/AssemblyInfo.vb

@@ -14,7 +14,7 @@ Imports System.Runtime.InteropServices
 <Assembly: AssemblyCompany("Digital Data")>
 <Assembly: AssemblyProduct("TaskFlow")>
 <Assembly: AssemblyCopyright("Copyright © Digital Data 2023")>
-<Assembly: AssemblyTrademark("2.4.6.3")>
+<Assembly: AssemblyTrademark("2.4.6.4")>
 
 <Assembly: ComVisible(False)>
 
@@ -32,6 +32,6 @@ Imports System.Runtime.InteropServices
 ' übernehmen, indem Sie "*" eingeben:
 ' <Assembly: AssemblyVersion("1.0.*")> 
 
-<Assembly: AssemblyVersion("2.4.6.3")>
+<Assembly: AssemblyVersion("2.4.6.4")>
 <Assembly: AssemblyFileVersion("1.0.0.0")>
 <Assembly: NeutralResourcesLanguage("")>