1 files changed, 5 insertions, 0 deletions
diff --git a/generic/tkMenu.c b/generic/tkMenu.c
index d24516f..42ddbd5 100644
--- a/generic/tkMenu.c
+++ b/generic/tkMenu.c
@@ -2495,6 +2495,11 @@ MenuVarProc(
     }
 
     menuPtr = mePtr->menuPtr;
+
+    if (menuPtr->menuFlags & MENU_DELETION_PENDING) {
+    	return NULL;
+    }
+
     name = Tcl_GetString(mePtr->namePtr);
 
     /*