* use current_module.realmodulename^ (= unit name as declared in its main

source) instead of the filename of a unit's source as its Java class name

git-svn-id: branches/jvmbackend@18352 -

compiler/agjasmin.pas

@@ -411,7 +411,7 @@ implementation
           begin
             { fake class type for unit -> name=unitname and
               superclass=java.lang.object }
-            AsmWriteLn('.class '+ChangeFileExt(ExtractFileName(n),''));
+            AsmWriteLn('.class '+current_module.realmodulename^);
             AsmWriteLn('.super java/lang/Object');
           end
         else