#DOCUMENTATION by mawalch
class: MenuPanel
comment/format in: #helpTextAt:
Fix typo
--- a/MenuPanel.st Sat Oct 21 23:16:32 2017 +0200
+++ b/MenuPanel.st Thu Oct 26 16:08:11 2017 +0200
@@ -4566,18 +4566,20 @@
helpTextAt:aPoint
"return the helpText for aPoint (i.e. when mouse-pointer is moved over an item).
- If there is a selection, that items helpText is used (ignoreing the given point)."
+ If there is a selection, that items helpText is used (ignoring the given point)."
|scrollerDirectionOrNil|
"/ is a scroller-button present and hit ?
scrollerDirectionOrNil := self scrollerDirectionAtPoint:aPoint.
scrollerDirectionOrNil notNil ifTrue:[
- ^ 'Scroll Menu Items'
+ ^ 'Scroll Menu Items'
].
self withMenuAndItemAt:aPoint do:[:menu :item | ^ menu helpTextForItem:item].
^ nil
+
+ "Modified (comment): / 26-10-2017 / 16:01:16 / mawalch"
!
helpTextForItem:anItem