Text.st
changeset 666 1c1d4014849b
parent 665 0c124fe4cb25
child 702 0c2c9b9fb4aa
--- a/Text.st	Sun Jun 21 04:48:45 1998 +0200
+++ b/Text.st	Thu Jul 09 10:26:36 1998 +0200
@@ -622,7 +622,9 @@
             ifFalse:[emphasis == #underline ifTrue:[underline := true]
             ifFalse:[emphasis == #strikeout ifTrue:[strikeout := true]
             ifFalse:[emphasis == #reverse ifTrue:[reverse := true]
-            ]]]]
+            ifFalse:[emphasis == #boldUnderline ifTrue:[bold := underline := true]
+            ifFalse:[emphasis == #italicUnderline ifTrue:[italic := underline := true]
+            ]]]]]]
         ] ifFalse:[
             (emphasis isMemberOf:Association) ifTrue:[
                 value := emphasis value.
@@ -640,6 +642,8 @@
                         ifFalse:[entry == #underline ifTrue:[underline := true]
                         ifFalse:[entry == #strikeout ifTrue:[strikeout := true]
                         ifFalse:[entry == #reverse ifTrue:[reverse := true]
+                        ifFalse:[entry == #boldUnderline ifTrue:[bold := underline := true]
+                        ifFalse:[entry == #italicUnderline ifTrue:[italic := underline := true]
                         ifFalse:[
                             (entry isMemberOf:Association) ifTrue:[
                                 value := entry value.
@@ -650,7 +654,7 @@
                                     bgPaint := value
                                 ]]
                             ]
-                        ]]]]]
+                        ]]]]]]]
                     ]
                 ]
             ]
@@ -717,7 +721,7 @@
     aGC paint:savedPaint on:savedBgPaint.
 
     "Created: / 12.5.1996 / 11:14:30 / cg"
-    "Modified: / 21.6.1998 / 03:52:16 / cg"
+    "Modified: / 8.7.1998 / 12:01:44 / cg"
 ! !
 
 !Text methodsFor:'emphasis'!
@@ -1178,6 +1182,6 @@
 !Text class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic2/Text.st,v 1.43 1998-06-21 02:48:45 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic2/Text.st,v 1.44 1998-07-09 08:26:36 cg Exp $'
 ! !
 Text initialize!