--- a/FlyByHelp.st Wed Nov 13 19:19:53 2013 +0100
+++ b/FlyByHelp.st Tue Nov 26 22:31:44 2013 +0100
@@ -363,7 +363,9 @@
lastHelpText := aHelpText.
helpTextShown := aHelpText.
- textLines := helpTextShown withCRs asCollectionOfLines asStringCollection.
+ "/ the text originator must already have generated CRs;
+ "/ no longer done here (otherwise, we could not generate tooltips with windows filenames in it)
+ textLines := helpTextShown "withCRs" asCollectionOfLines asStringCollection.
textLines size > (self class maxNumberOfLines) ifTrue:[
textLines := (textLines copyTo:(self class maxNumberOfLines)) copyWith:'...'
].
@@ -450,10 +452,10 @@
!FlyByHelp class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libview2/FlyByHelp.st,v 1.62 2013-10-14 15:44:31 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libview2/FlyByHelp.st,v 1.63 2013-11-26 21:31:44 cg Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libview2/FlyByHelp.st,v 1.62 2013-10-14 15:44:31 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libview2/FlyByHelp.st,v 1.63 2013-11-26 21:31:44 cg Exp $'
! !