#UI_ENHANCEMENT by cg
authorClaus Gittinger <cg@exept.de>
Thu, 13 Jul 2017 15:01:24 +0200
changeset 3963 9e2d653b39e8
parent 3962 f281042e880e
child 3964 6badb85f429d
#UI_ENHANCEMENT by cg class: ActiveHelpView changed: #contents: care for tabs in label strings
ActiveHelpView.st
--- a/ActiveHelpView.st	Wed Jun 28 13:32:48 2017 +0200
+++ b/ActiveHelpView.st	Thu Jul 13 15:01:24 2017 +0200
@@ -160,14 +160,14 @@
     "set the text"
 
     (myView isKindOf:Label) ifTrue:[
-        myView label:someText asString.
+        myView label:someText asString withTabsExpanded.
         myView extent:(myView preferredExtent).
     ] ifFalse:[
         myView contents:someText.
     ].
     self resizeToFit
 
-    "Modified: 27.4.1996 / 15:14:56 / cg"
+    "Modified: / 13-07-2017 / 14:51:59 / cg"
 !
 
 controllingHelpListener:something