--- a/MenuPanel.st Thu Jan 19 13:21:45 2006 +0100
+++ b/MenuPanel.st Fri Jan 20 15:52:32 2006 +0100
@@ -3632,13 +3632,13 @@
If there is a selection, that items helpText is used (ignoreing the given point)."
self withMenuAndItemAt:srcPoint do:[:menu :item | ^ menu helpTextForItem:item].
- ^ ''
+ ^ nil
!
helpTextForItem:anItem
"returns the helpText for an item (empty if none)"
- anItem isNil ifTrue:[^ ''].
+ anItem isNil ifTrue:[^ nil].
^ anItem activeHelpText.
!
@@ -7613,7 +7613,7 @@
!MenuPanel class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libwidg2/MenuPanel.st,v 1.419 2006-01-19 12:21:05 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg2/MenuPanel.st,v 1.420 2006-01-20 14:52:32 cg Exp $'
! !
MenuPanel initialize!