paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-10-31 12:01:27 +01:00
Code Issues Packages Projects Releases Wiki Activity

Packager: Remove useless calls to NameToValidIdentifier.

Browse Source 
git-svn-id: trunk@56347 -
This commit is contained in:
juha 2017-11-10 08:46:21 +00:00
parent 6a0191fb70
commit 32d0db97c0
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
packager/pkgmanager.pas
View File

@ -3474,7 +3474,7 @@ var
begin begin
Result:=mrCancel; Result:=mrCancel;
// create a new package with standard dependencies // create a new package with standard dependencies
NewPackage:=PackageGraph.CreateNewPackage(NameToValidIdentifier(lisPkgMangNewPackage)); NewPackage:=PackageGraph.CreateNewPackage(lisPkgMangNewPackage);
PackageGraph.AddDependencyToPackage(NewPackage, PackageGraph.AddDependencyToPackage(NewPackage,
PackageGraph.FCLPackage.CreateDependencyWithOwner(NewPackage)); PackageGraph.FCLPackage.CreateDependencyWithOwner(NewPackage));
NewPackage.Modified:=false; NewPackage.Modified:=false;
@ -5072,7 +5072,7 @@ begin
if APackage=nil then begin if APackage=nil then begin
// create new package // create new package
// create a new package with standard dependencies // create a new package with standard dependencies
APackage:=PackageGraph.CreateNewPackage(NameToValidIdentifier(lisPkgMangNewPackage)); APackage:=PackageGraph.CreateNewPackage(lisPkgMangNewPackage);
PackageGraph.AddDependencyToPackage(APackage, PackageGraph.AddDependencyToPackage(APackage,
PackageGraph.IDEIntfPackage.CreateDependencyWithOwner(APackage)); PackageGraph.IDEIntfPackage.CreateDependencyWithOwner(APackage));
APackage.Modified:=false; APackage.Modified:=false;