--- a/src/JavaClassReader.st	Wed Sep 14 19:53:36 2011 +0000
+++ b/src/JavaClassReader.st	Wed Sep 14 21:29:11 2011 +0000
@@ -644,14 +644,10 @@
 
     |inStream javaClass|
 
-    "Silent"false ifFalse:[
-        'reading ' print. aFilename print. ' ...' printCR.
-    ].
-
     [
         inStream := aFilename asFilename readStream.
     ] on:StreamError do:[:ex|
-        ('JAVA [info]: no file: ' , aFilename asString) printCR.
+        Logger log: ('no file: ' , aFilename asString) severity: #error facility: 'JVM'.
         self halt.
         ^ nil
     ].
@@ -663,7 +659,7 @@
     inStream close.
 
     AbsolutelySilent ifFalse:[
-        '  ... loaded ' print. javaClass displayString printNL.
+        Logger log: 'loaded class ' , javaClass displayString severity: #info facility: 'JVM'.
     ].
 
 
@@ -671,7 +667,7 @@
 
     "Created: / 15-04-1996 / 14:58:53 / cg"
     "Modified: / 09-05-1998 / 01:44:24 / cg"
-    "Modified: / 09-08-2011 / 15:18:32 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 14-09-2011 / 22:20:22 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
 readStream:aStream
@@ -692,15 +688,14 @@
     | javaClass |
 
     javaClass := JavaClassReader new readStream: aStream ignoring: classesBeingLoaded.
-    AbsolutelySilent 
-        ifFalse: 
-            [ '  ... loaded ' print.
-            javaClass displayString printNL. ].
+    AbsolutelySilent ifFalse: [ 
+        Logger log: 'loaded class ' , javaClass displayString severity: #info facility: 'JVM'.
+    ].
     ^ javaClass
 
     "Modified: / 30-03-1998 / 18:14:40 / cg"
     "Modified: / 09-05-2011 / 23:15:30 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
-    "Modified: / 26-07-2011 / 17:21:31 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 14-09-2011 / 22:21:34 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
 readStream:aStream loader:aClassLoader
@@ -2486,7 +2481,7 @@
         m setAccessFlags:access_flags.
         tooManyArgs := false.
         ArgumentError handle:[:ex |
-            'JAVA: ***** java method has too many arguments - will fail to execute' infoPrintCR.
+            Logger log: 'java method has too many arguments - will fail to execute' severity: #warn facility: 'JVM'.
             tooManyArgs := true.
             ex proceed.
         ] do:[
@@ -2528,7 +2523,7 @@
 
     "Created: / 15-04-1996 / 16:48:49 / cg"
     "Modified: / 25-09-1999 / 23:16:25 / cg"
-    "Modified: / 14-08-2011 / 19:42:27 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 14-09-2011 / 22:08:04 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
 readMethodsFor:aJavaClass
@@ -2678,9 +2673,10 @@
 !JavaClassReader methodsFor:'logging'!
 
 info: message 
-    Verbose ifTrue: [ Transcript showCR: message printString ].
+    Verbose ifTrue: [ Logger log: message severity: #info facility: 'JVM' ].
 
     "Created: / 18-05-2011 / 15:06:06 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
+    "Modified (format): / 14-09-2011 / 21:39:27 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !
 
 !JavaClassReader class methodsFor:'documentation'!