--- a/src/JavaClassReader.st	Thu Aug 16 12:48:04 2012 +0000
+++ b/src/JavaClassReader.st	Thu Aug 16 17:08:40 2012 +0000
@@ -106,6 +106,7 @@
 
 fileMajorVersions
     ^#( 
+        45  "Java 1.0.2"
         46  "Java 1.2"
         47  "???"
         48  "???"
@@ -124,14 +125,14 @@
 "
 
     "Created: / 19-10-2010 / 21:40:36 / Jan Vrany <jan.vrany@fit.cvut.cz>"
-    "Modified: / 01-06-2011 / 21:44:14 / Jan Vrany <jan.vrany@fit.cvut.cz>"
     "Modified: / 02-06-2011 / 22:50:17 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
     "Modified: / 18-08-2011 / 19:32:37 / jv"
+    "Modified (comment): / 16-08-2012 / 15:34:37 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
 fileMinorVersions
     ^ #(
-        3 "Java 1.2"
+        3 "Java 1.0.2 , Java 1.2"
         0 "Java 6"
     )
 
@@ -494,20 +495,19 @@
     ((self class fileMajorVersions includes: majorVsn) not 
         or: [ (self class fileMinorVersions includes: minorVsn) not ]) 
             ifTrue: [
-                Transcript
-                    show: 'warning this file has version ';
-                    show: majorVsn;
-                    show: '.';
-                    showCR: minorVsn.
-            ].
-    Verbose ifTrue: [
-        Transcript
-            show: 'version = ';
-            show: (majorVsn printString);
-            show: '.';
-            showCR: (minorVsn printString).
-    ].
-    
+                | path |
+
+                path := inStream isFileStream ifTrue:[
+                    path := inStream pathName
+                ] ifFalse:[
+                    path := '<memory>'
+                ].
+                self info:
+                    ('class reader: file ', path , ' has version ' ,
+                         majorVsn printString ,
+                            '.' , minorVsn printString)
+
+            ].    
     "/
     "/ get constant pool
     "/
@@ -635,7 +635,7 @@
     "Modified: / 15-10-2010 / 17:37:38 / Jan Kurs <kurs.jan@post.cz>"
     "Modified: / 28-01-2011 / 15:09:48 / Marcel Hlopko <hlopik@gmail.com>"
     "Modified: / 18-05-2011 / 15:30:29 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
-    "Modified: / 03-12-2011 / 12:22:19 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 16-08-2012 / 15:33:34 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
 readStream:aStream ignoring:classesBeingLoaded