--- a/MiniLogger.st	Wed Mar 13 00:55:04 2013 +0000
+++ b/MiniLogger.st	Fri Mar 15 11:23:05 2013 +0000
@@ -111,9 +111,10 @@
     | originator |
     originator := thisContext sender receiver.
 
-    self log: message severity: #debug facility: (self facilityOf: originator) originator: originator attachment: attachment
+    self log: message severity: severity facility: (self facilityOf: originator) originator: originator attachment: attachment
 
     "Created: / 15-09-2011 / 11:47:20 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 15-03-2013 / 11:20:13 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
 log: message severity: severity facility: facility
@@ -158,23 +159,30 @@
 
 log: message severity: severity originator: originator
 
-    self log: message severity: #debug facility: (self facilityOf: originator) originator: originator
+    self log: message severity: severity facility: (self facilityOf: originator) originator: originator
 
     "Created: / 15-09-2011 / 10:26:47 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 15-03-2013 / 11:20:30 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !
 
 !MiniLogger class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/MiniLogger.st,v 1.1 2011-10-31 16:06:38 vrany Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/MiniLogger.st,v 1.2 2013-03-15 11:21:39 +0000 vrany Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/MiniLogger.st,v 1.1 2011-10-31 16:06:38 vrany Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/MiniLogger.st,v 1.2 2013-03-15 11:21:39 +0000 vrany Exp $'
+!
+
+version_HG
+
+    ^ '$Changeset: <not expanded> $'
 !
 
 version_SVN
     ^ '§Id: MiniLogger.st 10688 2011-09-15 11:05:35Z vranyj1 §'
 ! !
 
+
 MiniLogger initialize!

--- a/libbasic.rc	Wed Mar 13 00:55:04 2013 +0000
+++ b/libbasic.rc	Fri Mar 15 11:23:05 2013 +0000
@@ -25,7 +25,7 @@
       VALUE "LegalCopyright", "Copyright Claus Gittinger 1988-2012\nCopyright eXept Software AG 1998-2012\0"
       VALUE "ProductName", "Smalltalk/X\0"
       VALUE "ProductVersion", "6.2.3.0\0"
-      VALUE "ProductDate", "Wed, 13 Mar 2013 00:53:25 GMT\0"
+      VALUE "ProductDate", "Fri, 15 Mar 2013 11:22:13 GMT\0"
     END
 
   END