فهرست منبع

* always add a fileextension to the package name so that packages with dotted names are handled correctly

git-svn-id: trunk@34231 -
svenbarth 9 سال پیش
والد
کامیت
cb5f582f94
1فایلهای تغییر یافته به همراه2 افزوده شده و 1 حذف شده
  1. 2 1
      compiler/fpcp.pas

+ 2 - 1
compiler/fpcp.pas

@@ -411,7 +411,8 @@ implementation
     constructor tpcppackage.create(const pn: string);
     begin
       inherited create(pn);
-      setfilename(pn,true);
+
+      setfilename(pn+'.ppk',true);
     end;
 
   destructor tpcppackage.destroy;