fix: MUST return nil, if there is no help text (not empty string !)
authorClaus Gittinger <cg@exept.de>
Fri, 20 Jan 2006 15:52:32 +0100
changeset 2884 6e060df8f158
parent 2883 58f2f296254d
child 2885 72bacd36ba5b
fix: MUST return nil, if there is no help text (not empty string !)
MenuPanel.st
--- 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!