FlyByHelp.st
changeset 3681 c56b665d08a7
parent 3675 c7ba11759026
child 3687 928ad306556f
child 3763 72a6db06eee5
--- a/FlyByHelp.st	Mon May 16 09:36:28 2016 +0200
+++ b/FlyByHelp.st	Tue May 17 00:03:00 2016 +0200
@@ -387,7 +387,9 @@
     helpTextShown := aHelpText.
     "/ 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 := helpTextShown isStringCollection 
+                    ifTrue:[helpTextShown]
+                    ifFalse:[ helpTextShown "withCRs" asCollectionOfLines asStringCollection].
     textLines size > (self class maxNumberOfLines) ifTrue:[
         textLines := (textLines copyTo:(self class maxNumberOfLines)) copyWith:'...'
     ].