diff --git a/src/File Parser/FileParser.vb b/src/File Parser/FileParser.vb index 181f013..9439942 100644 --- a/src/File Parser/FileParser.vb +++ b/src/File Parser/FileParser.vb @@ -284,7 +284,7 @@ Class FileParser End Try Try - Dim CreateWindow As Boolean = (MyLog.DebugLevel = Debug) + Dim CreateWindow As Boolean = (MyLog.DebugLevel = Trace) Dim ffmpeg As New ProcessStartInfo(MyGlobalSyncSettings.ffmpegPath) With { .CreateNoWindow = Not CreateWindow, .UseShellExecute = False diff --git a/src/Logger.vb b/src/Logger.vb index 5cbb117..87e16f6 100644 --- a/src/Logger.vb +++ b/src/Logger.vb @@ -6,6 +6,7 @@ Imports System.Environment Public Class Logger Public Enum LogLevel + Trace Debug Information Warning @@ -27,6 +28,8 @@ Public Class Logger Public Shared Function ConvertStringToLogLevel(LogLevelString As String) As LogLevel Select Case LogLevelString + Case Is = "Trace" + Return Trace Case Is = "Debug" Return Debug Case Is = "Information" @@ -44,6 +47,8 @@ Public Class Logger Public Shared Function ConvertLogLevelToString(LogLevel As LogLevel) As String Select Case LogLevel + Case Is = Trace + Return "Trace" Case Is = Debug Return "Debug" Case Is = Information @@ -84,6 +89,8 @@ Public Class Logger Dim LogMarker As String Select Case LogLevel + Case Is = Trace + LogMarker = " [Trace] : " Case Is = Debug LogMarker = " [Debug] : " Case Is = Information