Add new "Trace" log level to show ffmpeg windows.

DragonQ · Jun 6, 2020 · 2813c2a · 2813c2a
1 parent 13b03d6
commit 2813c2a
Show file tree

Hide file tree

Showing 2 changed files with 8 additions and 1 deletion.
diff --git 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
@@ -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