diff --git a/generic/tkMenu.c b/generic/tkMenu.c
index a8d51044f..27134ddbf 100644
--- a/generic/tkMenu.c
+++ b/generic/tkMenu.c
@@ -2185,6 +2185,12 @@ GetMenuIndex(
 	*indexPtr = TCL_INDEX_NONE;
 	return TCL_OK;
     }
+#if !defined(TK_NO_DEPRECATED)
+    if ((string[0] == 'n') && (strcmp(string, "none") == 0)) {
+	*indexPtr = TCL_INDEX_NONE;
+	return TCL_OK;
+    }
+#endif
 
     if (string[0] == '@') {
 	if (GetIndexFromCoords(interp, menuPtr, string, indexPtr)