--- a/Tools__BreakpointService.st Wed Nov 19 21:35:15 2014 +0100
+++ b/Tools__BreakpointService.st Wed Nov 19 21:40:55 2014 +0100
@@ -341,7 +341,11 @@
view == gutterView ifTrue:[
button == 1 ifTrue:[
-"/ lineNr := textView yVisibleToLineNr:y.
+ lineNr := textView yVisibleToLineNr:y.
+ FlyByHelp currentHelpListener notNil ifTrue:[
+ "/ show a message that a double click is now needed
+ FlyByHelp currentHelpListener initiateHelpFor:view at:x@y now:true
+ ].
"/ lineNr notNil ifTrue:[ self setOrToggleBreakpointAtLine:lineNr ].
^ true.
].
@@ -698,14 +702,14 @@
!BreakpointService class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/Tools__BreakpointService.st,v 1.54 2014-11-19 17:49:40 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/Tools__BreakpointService.st,v 1.55 2014-11-19 20:40:55 cg Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libtool/Tools__BreakpointService.st,v 1.54 2014-11-19 17:49:40 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/Tools__BreakpointService.st,v 1.55 2014-11-19 20:40:55 cg Exp $'
!
version_SVN
- ^ '$Id: Tools__BreakpointService.st,v 1.54 2014-11-19 17:49:40 cg Exp $'
+ ^ '$Id: Tools__BreakpointService.st,v 1.55 2014-11-19 20:40:55 cg Exp $'
! !