Remove config migration

This commit is contained in:
Jonathan Jenne
2023-10-13 11:21:13 +02:00
parent 2facc47a4b
commit 3b16e15896

View File

@@ -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