mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-08-23 14:49:10 +02:00
Packager: Remove useless calls to NameToValidIdentifier.
git-svn-id: trunk@56347 -
This commit is contained in:
parent
6a0191fb70
commit
32d0db97c0
@ -3474,7 +3474,7 @@ var
|
||||
begin
|
||||
Result:=mrCancel;
|
||||
// create a new package with standard dependencies
|
||||
NewPackage:=PackageGraph.CreateNewPackage(NameToValidIdentifier(lisPkgMangNewPackage));
|
||||
NewPackage:=PackageGraph.CreateNewPackage(lisPkgMangNewPackage);
|
||||
PackageGraph.AddDependencyToPackage(NewPackage,
|
||||
PackageGraph.FCLPackage.CreateDependencyWithOwner(NewPackage));
|
||||
NewPackage.Modified:=false;
|
||||
@ -5072,7 +5072,7 @@ begin
|
||||
if APackage=nil then begin
|
||||
// create new package
|
||||
// create a new package with standard dependencies
|
||||
APackage:=PackageGraph.CreateNewPackage(NameToValidIdentifier(lisPkgMangNewPackage));
|
||||
APackage:=PackageGraph.CreateNewPackage(lisPkgMangNewPackage);
|
||||
PackageGraph.AddDependencyToPackage(APackage,
|
||||
PackageGraph.IDEIntfPackage.CreateDependencyWithOwner(APackage));
|
||||
APackage.Modified:=false;
|
||||
|
Loading…
Reference in New Issue
Block a user