mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-04-08 02:38:03 +02:00
IDE: allow to uninstall dummy packages
git-svn-id: trunk@41268 -
This commit is contained in:
parent
e877a46d2e
commit
306c8060f6
@ -949,8 +949,7 @@ begin
|
||||
APackage:=PackageGraph.FindPackageWithID(DelPackageID);
|
||||
if APackage<>nil then begin
|
||||
// check if package is a base package
|
||||
if APackage.AutoCreated
|
||||
or PackageGraph.IsStaticBasePackage(APackage.Name) then begin
|
||||
if PackageGraph.IsStaticBasePackage(APackage.Name) then begin
|
||||
TVNode.Selected:=false;
|
||||
MessageDlg(lisUninstallImpossible,
|
||||
Format(lisThePackageCanNotBeUninstalledBecauseItIsNeededByTh, [
|
||||
|
Loading…
Reference in New Issue
Block a user