--- a/MenuPanel.st Sat Oct 26 17:45:55 2002 +0200
+++ b/MenuPanel.st Sat Oct 26 17:51:56 2002 +0200
@@ -1063,12 +1063,6 @@
^ nil
!
-originator:aWidget
- "set the originating widget"
-
- originator := aWidget
-!
-
receiver
"get the menu-receiver. Thats the one who gets the messages ( both from myself and
from all submenus no specific receiver is defined ).
@@ -1967,6 +1961,16 @@
"Created: / 21.5.1998 / 14:15:57 / cg"
!
+startUpFor:originatingWidget
+ "realize the menu at the current pointer position
+ return the value of the selectedItem or nil, of none was selected
+ (unless the menu has already performed its action, by sending an appropriate message
+ to some performer)
+ "
+ originator := originatingWidget.
+ ^ self startUp
+!
+
startUpOrNil
"realize the menu at the current pointer position
return the value of the selectedItem or nil, of none was selected
@@ -7320,7 +7324,7 @@
!MenuPanel class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libwidg2/MenuPanel.st,v 1.340 2002-10-26 15:45:55 ca Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg2/MenuPanel.st,v 1.341 2002-10-26 15:51:56 ca Exp $'
! !
MenuPanel initialize!