Improve logging for debug checkbox

This commit is contained in:
Jonathan Jenne 2022-04-14 14:14:41 +02:00
parent ba5758d2ca
commit d3eee77136

View File

@ -356,12 +356,16 @@ Public Class frmConfig_Basic
Private Sub CheckBox1_CheckedChanged(sender As Object, e As EventArgs) Handles chkLogErrorsOnly.CheckedChanged
If formloaded = True Then
CONFIG.Config.LogDEBUG = chkLogErrorsOnly.Checked
Dim oDebug = chkLogErrorsOnly.Checked
CONFIG.Config.LogDEBUG = oDebug
CONFIG.Save()
'SaveConfigValue("LogErrorsOnly", chkLogErrorsOnly.Checked)
LOGGER.Info(" >> LogErrorsOnly changed to '" & chkLogErrorsOnly.Checked)
LogErrorsOnly = chkLogErrorsOnly.Checked
LOGCONFIG.Debug = chkLogErrorsOnly.Checked
LOGGER.Info("Debug Log Enabled: [{0}]", oDebug)
LOGGER.Debug("Debug Log Enabled: [{0}]", oDebug)
LogErrorsOnly = oDebug
LOGCONFIG.Debug = oDebug
End If
End Sub
<STAThread()>