# HG changeset patch # User Claus Gittinger # Date 1377903912 -7200 # Node ID 86835045a8286f37b6fad5fa2514e4a75ea4796c # Parent a763f8380db3a478c4e21c31a04466e473f5f23e class: Tools::CodeNavigationService changed: #button2PressForSelector: diff -r a763f8380db3 -r 86835045a828 Tools__CodeNavigationService.st --- a/Tools__CodeNavigationService.st Sat Aug 31 00:56:42 2013 +0200 +++ b/Tools__CodeNavigationService.st Sat Aug 31 01:05:12 2013 +0200 @@ -223,7 +223,11 @@ button2PressForSelector: selector | senders | - senders := codeView sendersOf: selector. + [ + senders := codeView sendersOf: selector. + ] valueWithTimeout:(500 milliseconds). + senders isNil ifTrue:[^ self]. + "/ senders size = 1 ifTrue:[ codeView browseMethod: senders anyOne. ^ self]. [ menuShown := codeView sendersMenu: senders selector: selector. @@ -725,14 +729,14 @@ !CodeNavigationService class methodsFor:'documentation'! version - ^ '$Header: /cvs/stx/stx/libtool/Tools__CodeNavigationService.st,v 1.32 2013-08-29 14:38:29 cg Exp $' + ^ '$Header: /cvs/stx/stx/libtool/Tools__CodeNavigationService.st,v 1.33 2013-08-30 23:05:12 cg Exp $' ! version_CVS - ^ '$Header: /cvs/stx/stx/libtool/Tools__CodeNavigationService.st,v 1.32 2013-08-29 14:38:29 cg Exp $' + ^ '$Header: /cvs/stx/stx/libtool/Tools__CodeNavigationService.st,v 1.33 2013-08-30 23:05:12 cg Exp $' ! version_SVN - ^ '$Id: Tools__CodeNavigationService.st,v 1.32 2013-08-29 14:38:29 cg Exp $' + ^ '$Id: Tools__CodeNavigationService.st,v 1.33 2013-08-30 23:05:12 cg Exp $' ! !