class: FlyByHelp
authorClaus Gittinger <cg@exept.de>
Tue, 26 Nov 2013 22:31:44 +0100
changeset 3257 382b74692cfc
parent 3256 1eaaec0de5fe
child 3258 b0c9d06f22ef
class: FlyByHelp changed: #showHelp:for: do not convert backslashes to CRs here instead, the text originator must already have generated CRs; (otherwise, we could not generate tooltips with windows filenames in it)
FlyByHelp.st
--- 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 $'
 ! !