* realmodulename must be used of course

git-svn-id: trunk@1181 -

compiler/scandir.pas

@@ -845,7 +845,7 @@ implementation
             begin
               delete(S,1,1);
               if m_delphi in aktmodeswitches then
-                insert(current_module.modulename^,S,1)
+                insert(current_module.realmodulename^,S,1)
               else
                 insert(lower(current_module.modulename^),S,1);
             end;