瀏覽代碼

* 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;