--- a/Text.st Fri Oct 19 13:36:05 2012 +0200
+++ b/Text.st Sat Oct 20 21:12:23 2012 +0200
@@ -1591,7 +1591,8 @@
!
hasChangeOfEmphasis
- "return true, if the receiver contains non-empty emphasis information"
+ "return true, if the receiver contains non-empty emphasis information
+ i.e. any non-normal (=emphasized) characters"
^ (runs notEmptyOrNil
and:[(runs findFirst:[:e | e notNil]) ~~ 0])
@@ -1811,11 +1812,11 @@
!Text class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic2/Text.st,v 1.114 2012-04-03 10:47:52 stefan Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic2/Text.st,v 1.115 2012-10-20 19:12:23 cg Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libbasic2/Text.st,v 1.114 2012-04-03 10:47:52 stefan Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic2/Text.st,v 1.115 2012-10-20 19:12:23 cg Exp $'
! !
Text initialize!