Merge pull request #87 from sy-c/master

v2.5.3

Author: sy-c

CMakeLists.txt

@@ -65,7 +65,7 @@ endif()
 include(ExternalProject)
 externalproject_add (Common-standalone
   GIT_REPOSITORY "https://github.com/AliceO2Group/Common.git"
-  GIT_TAG "v1.5.2"
+  GIT_TAG "v1.6.1"
   LOG_DOWNLOAD 1
   UPDATE_COMMAND ""
   PATCH_COMMAND ""

doc/releaseNotes.md

@@ -132,3 +132,6 @@ This file describes the main feature changes for each InfoLogger released versio
 
 ## v2.5.2 - 03/10/2022
 - added optional parameter to InfoLogger::filterDiscardSetFile(), to ignore debug messages when set.
+
+## v2.5.3 - 24/10/2022
+- Common/SimpleLog update: fiterDiscardSetFile / rotateMaxFiles parameter: If one, a single file is created and cleared immediately, and messages are discarded after reaching rotateMaxBytes.

include/InfoLogger/InfoLogger.hxx

@@ -379,7 +379,7 @@ class InfoLogger
   /// Defines a file where discarded messages are saved
   /// path: path to file. If null, discarding to file is disabled.
   /// rotateMaxBytes: Maximum file size, after which a new file is created. If zero, no limit.
-  /// rotateMaxFiles: Maximum number of files to keep (including the "current" file). If zero, no limit.
+  /// rotateMaxFiles: Maximum number of files to keep (including the "current" file). If zero, no limit. If one, a single file is created and cleared immediately, and messages are discarded after reaching rotateMaxBytes.
   /// rotateNow: If non-zero, the file is immediately rotated (independently of its size), otherwise it is appended.
   /// ignoreDebug: do not store debug messages in the file if set to true.
   /// Returns 0 on success, or an error code.

src/infoBrowser.tcl

@@ -194,6 +194,7 @@ font create filterfont -family Arial -size 9 -weight bold
 font create timefont -family Arial -size 9 -weight bold
 font create buttonfont -family Arial -size 9 -weight bold
 font create titlefont -family Arial -size 10 -weight bold
+font create messagesfont -family monospace -size 9
 
 ##############################
 # menu
@@ -949,7 +950,7 @@ proc show_messages {} {
   global log_fields
   global log_visible_fields
   global log_fields_def_size
-    
+  global messagesfont
   if {[winfo exists .messages.pw]} {destroy .messages.pw}
 
   global version_ok
@@ -966,7 +967,7 @@ proc show_messages {} {
   foreach item $log_visible_fields {
     frame .messages.pw.frame_$item 
     label .messages.pw.frame_$item.label -text "$item"
-    listbox .messages.pw.frame_$item.listbox -listvariable log_val_$item -yscrollcommand ".messages.sb set" -xscrollcommand ".messages.pw.frame_$item.scroll set"  -selectmode extended -selectbackground yellow -selectforeground black -exportselection no 
+    listbox .messages.pw.frame_$item.listbox -listvariable log_val_$item -yscrollcommand ".messages.sb set" -xscrollcommand ".messages.pw.frame_$item.scroll set"  -selectmode extended -selectbackground yellow -selectforeground black -exportselection no -font messagesfont
     scrollbar .messages.pw.frame_$item.scroll -orient horizontal -command ".messages.pw.frame_$item.listbox xview" -width 10
 
     set pwidth "[expr 8*[lindex $log_fields_def_size [lsearch $log_fields $item]]]"