MiniLogger.st
changeset 16896 9f126475a2eb
parent 16895 df368a381d23
child 16897 f3e1acb976ba
--- a/MiniLogger.st	Thu Oct 09 10:47:11 2014 +0200
+++ b/MiniLogger.st	Thu Oct 09 11:49:20 2014 +0200
@@ -597,6 +597,15 @@
 log: message severity: severity facility: facility originator: originator attachment: attachment on:aStream
     "Pricipal logging method. This mimics VM __stxLog__()"
 
+    | messageProperlyEncoded |
+
+    messageProperlyEncoded := message.
+    "/ If the message is Unicode 16/32 string and stream is external,
+    "/ we have to recode the message using locale-specific encoding 
+    (message isWideString and:[ aStream isExternalStream ]) ifTrue:[ 
+        messageProperlyEncoded := OperatingSystem encodePath: message.
+    ].
+
     aStream
         nextPutAll: facility ? 'STX';
         space;
@@ -609,7 +618,7 @@
     Timestamp now printOn:aStream format:'%(year)-%(mon)-%(day) %h:%m:%s.%i'.
     aStream nextPut:$).
     aStream space.
-    aStream nextPutAll: message.
+    aStream nextPutAll: messageProperlyEncoded.
     aStream cr.
 
     "
@@ -617,7 +626,7 @@
     "
 
     "Created: / 14-09-2011 / 21:18:27 / Jan Vrany <jan.vrany@fit.cvut.cz>"
-    "Modified: / 22-09-2014 / 11:57:46 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 09-10-2014 / 10:47:36 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !
 
 !MiniLogger::Severity methodsFor:'accessing'!
@@ -652,11 +661,11 @@
 !MiniLogger class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/MiniLogger.st,v 1.9 2014-10-09 08:47:11 vrany Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/MiniLogger.st,v 1.10 2014-10-09 09:49:20 vrany Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/MiniLogger.st,v 1.9 2014-10-09 08:47:11 vrany Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/MiniLogger.st,v 1.10 2014-10-09 09:49:20 vrany Exp $'
 !
 
 version_HG
@@ -665,7 +674,7 @@
 !
 
 version_SVN
-    ^ '$Id: MiniLogger.st,v 1.9 2014-10-09 08:47:11 vrany Exp $'
+    ^ '$Id: MiniLogger.st,v 1.10 2014-10-09 09:49:20 vrany Exp $'
 ! !