diff --git a/uppsrc/ide/UppWspc.cpp b/uppsrc/ide/UppWspc.cpp
index 9ba10bb4c..0618ad68b 100644
--- a/uppsrc/ide/UppWspc.cpp
+++ b/uppsrc/ide/UppWspc.cpp
@@ -1058,8 +1058,11 @@ void WorkspaceWork::PackageMenu(Bar& menu)
 		menu.Add(cando, ~NFormat("Add package to '%s'", act), IdeImg::package_add(), THISBACK(AddNormalUses));
 		RemovePackageMenu(menu);
 		if(menu.IsMenuBar()) {
+			bool main = package.GetCursor() > 0;
+			
 			menu.Add(cando, "Rename package..", THISBACK(RenamePackage));
-			menu.Add(cando, "Delete package", THISBACK(DeletePackage));
+			menu.Add(cando, "Delete package", THISBACK(DeletePackage))
+				.Enable(!main);
 			menu.Separator();
 			BuildPackageMenu(menu);
 			menu.Add("Open Package Directory",THISBACK(OpenPackageFolder));