ApplicationModel.st
changeset 4429 b9e79975c33a
parent 4428 5111a837d71c
child 4443 81b3abce89d0
--- a/ApplicationModel.st	Sun Jan 19 17:31:15 2020 +0100
+++ b/ApplicationModel.st	Sun Jan 19 17:32:41 2020 +0100
@@ -4176,6 +4176,10 @@
 ctrlDown
     "answer true if the control key is currently pressed"
 
+    "/ cg: the following code breaks with menu-panels / popup menus,
+    "/ where the activeGroup seems to be different/nil temporarily,
+    "/ leading to isVisible to return true although it should not,
+    "/ leading to an item being not drawn (although the space for it was reserved initially)
 "/    |activeGroup|
 "/
 "/    (activeGroup := WindowGroup activeGroup) isNil ifTrue:[