MiniLogger.st
changeset 23109 c8ec00051542
parent 22710 731015dd01c5
child 23148 0c8e169a2e11
--- a/MiniLogger.st	Thu Jun 14 13:17:14 2018 +0200
+++ b/MiniLogger.st	Fri Jun 15 15:27:54 2018 +0200
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
 "
  COPYRIGHT (c) 2012-2014 by Jan Vrany & eXept Software AG
               All Rights Reserved
@@ -1194,6 +1192,8 @@
 
     |facility severityName words messageAsSent secondWord|
 
+    aStream isNil ifTrue:[^ self].
+    
     thisContext isRecursive ifTrue:[
         'STX:Logger [error]: recursive logger invocation.' _errorPrintCR.
         ^ self.
@@ -1261,7 +1261,7 @@
      Logger log:'test message' severity: DEBUG facility: 'TEST'
      Logger log:'test message' severity: INFO facility: 'TEST'
      Logger log:'test message' asUnicode16String severity: INFO facility: 'TEST'
-     Logger log:'test message äöüß' severity: INFO facility: 'TEST'
+     Logger log:'test message äöüß' severity: INFO facility: 'TEST'
      Logger log:'test message' severity: WARNING facility: 'TEST'
      Logger log:'test message' severity: ERROR facility: 'TEST'
      'test message' infoPrintCR
@@ -1276,6 +1276,7 @@
 
     "Created: / 14-09-2011 / 21:18:27 / Jan Vrany <jan.vrany@fit.cvut.cz>"
     "Modified: / 02-12-2014 / 10:50:09 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 15-06-2018 / 15:27:45 / Claus Gittinger"
 !
 
 severityThresholdOf:originator