# HG changeset patch # User sr # Date 1528357907 -7200 # Node ID f42780e51cc1fe8de5dbfb08c17f3430097043e6 # Parent 1a4cf666aafe0cc34e2d1447fe3d360c4537e737 #REFACTORING by sr class: FlyByHelp changed: #helpTextFromView:at: diff -r 1a4cf666aafe -r f42780e51cc1 FlyByHelp.st --- a/FlyByHelp.st Wed Jun 06 17:37:31 2018 +0200 +++ b/FlyByHelp.st Thu Jun 07 09:51:47 2018 +0200 @@ -215,7 +215,6 @@ |text key app| (aPointOrNil notNil and:[aView respondsTo:#helpTextAt:]) ifTrue:[ -(aView isKindOf:MenuPanel) ifTrue:[self halt]. text := aView helpTextAt:aPointOrNil. text notNil ifTrue:[^ text]. ]. @@ -257,6 +256,7 @@ "Modified: / 09-01-2018 / 17:38:42 / stefan" "Modified: / 06-06-2018 / 17:00:05 / Claus Gittinger" + "Modified (format): / 07-06-2018 / 09:51:41 / sr" ! ! !FlyByHelp methodsFor:'private'!