--- 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!