Bugfix in extended logger

This commit is contained in:
René Linder 2022-02-21 13:46:56 +01:00
parent 36c8ea1ac5
commit 6c85e4dff9

View file

@ -86,7 +86,7 @@ DeclareModule lhs_log_ext
EndDeclareModule
Module lhs_log_ext
XIncludeFile "lhs_uuid.pbi"
IncludeFile "lhs_uuid.pbi"
Global CreateLoggerMutex.i = CreateMutex()
Global ConsoleMutex.i = CreateMutex()
@ -106,7 +106,7 @@ Module lhs_log_ext
Logger(InternalUUID)\ExitSemaphore = CreateSemaphore()
Logger(InternalUUID)\MaxSize.q = 32 * 1024 * 1024
Logger(InternalUUID)\LastSize.q = 0
Logger(InternalUUID)\LogLevel.i = #Info
Logger(InternalUUID)\LogLevel.i = #Debugging
Logger(InternalUUID)\LogFileDateFormat.s = "%yyyy_%mm_%dd_%hh_%ii_%ss"
Logger(InternalUUID)\LogDateFormat.s = "%yyyy.%mm.%dd %hh:%ii:%ss"
Logger(InternalUUID)\console = #NoConsole
@ -165,8 +165,10 @@ Module lhs_log_ext
Logger(UUID)\LogLevel = #Warning
Case #Error
Logger(UUID)\LogLevel = #Error
Case #Debug
Logger(UUID)\LogLevel = #Debugging
Default
Logger(UUID)\LogLevel = #Error
Logger(UUID)\LogLevel = #Debugging
EndSelect
EndIf
EndProcedure