CharacterArray.st
changeset 21843 ac7c8bd9b695
parent 21840 d8a0a2f4bf9b
child 21994 c6af25dffe8d
--- a/CharacterArray.st	Mon Jun 19 18:27:15 2017 +0200
+++ b/CharacterArray.st	Tue Jun 20 08:29:38 2017 +0200
@@ -1217,7 +1217,11 @@
 asBoldText
     "return self as a bold text"
 
-    ^Text string: self emphasis: #bold
+    "this test allows for small non-gui apps to be built without libbasic2 (where Text is)"
+    Text isNil ifTrue:[^ self].
+    ^ Text string: self emphasis: #bold
+
+    "Modified (comment): / 20-06-2017 / 08:23:49 / cg"
 !
 
 asDate