Browse Source

* use realmodulename in unit not used msg

peter 21 years ago
parent
commit
b24163cef6
1 changed files with 5 additions and 2 deletions
  1. 5 2
      compiler/fmodule.pas

+ 5 - 2
compiler/fmodule.pas

@@ -675,7 +675,7 @@ implementation
           begin
           begin
             if assigned(map[i].unitsym) and
             if assigned(map[i].unitsym) and
                (map[i].unitsym.refs=0) then
                (map[i].unitsym.refs=0) then
-              MessagePos2(map[i].unitsym.fileinfo,sym_n_unit_not_used,map[i].u.modulename^,modulename^);
+              MessagePos2(map[i].unitsym.fileinfo,sym_n_unit_not_used,map[i].u.realmodulename^,realmodulename^);
           end;
           end;
       end;
       end;
 
 
@@ -694,7 +694,10 @@ implementation
 end.
 end.
 {
 {
   $Log$
   $Log$
-  Revision 1.45  2004-06-20 08:55:29  florian
+  Revision 1.46  2004-08-30 20:23:33  peter
+    * use realmodulename in unit not used msg
+
+  Revision 1.45  2004/06/20 08:55:29  florian
     * logs truncated
     * logs truncated
 
 
   Revision 1.44  2004/03/08 22:07:46  peter
   Revision 1.44  2004/03/08 22:07:46  peter