--- a/Text.st Tue Jul 06 23:49:35 1999 +0200
+++ b/Text.st Tue Jul 06 23:53:41 1999 +0200
@@ -674,8 +674,10 @@
ifFalse:[emphasis == #strikeout ifTrue:[strikeout := true]
ifFalse:[emphasis == #reverse ifTrue:[reverse := true]
ifFalse:[emphasis == #boldUnderline ifTrue:[bold := underline := true]
+ ifFalse:[emphasis == #boldUnderwave ifTrue:[bold := underwave := true]
ifFalse:[emphasis == #italicUnderline ifTrue:[italic := underline := true]
- ]]]]]]]
+ ifFalse:[emphasis == #italicUnderwave ifTrue:[italic := underwave := true]
+ ]]]]]]]]]
] ifFalse:[
(emphasis isMemberOf:Association) ifTrue:[
value := emphasis value.
@@ -705,7 +707,9 @@
ifFalse:[entry == #strikeout ifTrue:[strikeout := true]
ifFalse:[entry == #reverse ifTrue:[reverse := true]
ifFalse:[entry == #boldUnderline ifTrue:[bold := underline := true]
+ ifFalse:[emphasis == #boldUnderwave ifTrue:[bold := underwave := true]
ifFalse:[entry == #italicUnderline ifTrue:[italic := underline := true]
+ ifFalse:[emphasis == #italicUnderwave ifTrue:[italic := underwave := true]
ifFalse:[
(entry isMemberOf:Association) ifTrue:[
value := entry value.
@@ -724,7 +728,7 @@
entry value:ulPaint.
]]]]
]
- ]]]]]]]]
+ ]]]]]]]]]]
]
]
]
@@ -790,7 +794,7 @@
aGC paint:savedPaint on:savedBgPaint.
"Created: / 12.5.1996 / 11:14:30 / cg"
- "Modified: / 6.7.1999 / 23:49:15 / cg"
+ "Modified: / 6.7.1999 / 23:54:54 / cg"
! !
!Text methodsFor:'emphasis'!
@@ -1263,6 +1267,6 @@
!Text class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic2/Text.st,v 1.54 1999-07-06 21:49:35 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic2/Text.st,v 1.55 1999-07-06 21:53:41 cg Exp $'
! !
Text initialize!