Logging: write log when debug flag is changed

This commit is contained in:
Jonathan Jenne 2022-11-25 12:09:41 +01:00
parent a469ff9a23
commit 15d6cac420

View File

@ -481,6 +481,8 @@ Public Class LogConfig
''' <param name="Debug">Adds the Debug rule if true.</param> ''' <param name="Debug">Adds the Debug rule if true.</param>
''' <param name="Trace">Adds the Trace rule if true.</param> ''' <param name="Trace">Adds the Trace rule if true.</param>
Private Sub ReloadConfig(Optional Debug As Boolean = False, Optional Trace As Boolean = False) Private Sub ReloadConfig(Optional Debug As Boolean = False, Optional Trace As Boolean = False)
Dim oLogger = GetLogger()
' Clear Logging Rules ' Clear Logging Rules
_config.LoggingRules.Clear() _config.LoggingRules.Clear()
@ -490,6 +492,9 @@ Public Class LogConfig
' Add debug rule, if configured ' Add debug rule, if configured
If Debug = True Then If Debug = True Then
_config.AddRule(LogLevel.Debug, LogLevel.Error, TARGET_DEBUG) _config.AddRule(LogLevel.Debug, LogLevel.Error, TARGET_DEBUG)
oLogger.Info("DEBUG Logging is now Enabled.")
Else
oLogger.Debug("DEBUG Logging is now Disabled.")
End If End If
If Trace = True Then If Trace = True Then