--- 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!