Text.st
changeset 2240 ee1b89564617
parent 2233 04205abedbff
child 2259 d9b94e7b06a5
equal deleted inserted replaced
2239:342ce4db5707 2240:ee1b89564617
  1183      Transcript showCR:((Text string:'hello') allBold 
  1183      Transcript showCR:((Text string:'hello') allBold 
  1184                             emphasisFrom:2 to:4 remove:#bold)
  1184                             emphasisFrom:2 to:4 remove:#bold)
  1185     "
  1185     "
  1186 !
  1186 !
  1187 
  1187 
       
  1188 emphasiseFrom:start to:stop with:newEmphasis
       
  1189     "set to the emphasis within some range. return the receiver"
       
  1190 
       
  1191     start to:stop do:[:characterIndex |
       
  1192         self emphasisAt:characterIndex put:newEmphasis
       
  1193     ].
       
  1194 
       
  1195     "
       
  1196      (Text string:'hello') allBold 
       
  1197         emphasiseFrom:2 to:4 with:#italic
       
  1198 
       
  1199      Transcript showCR:((Text string:'hello') allBold 
       
  1200                             emphasiseFrom:2 to:4 with:#italic)
       
  1201 
       
  1202     "
       
  1203 !
       
  1204 
  1188 emphasizeAllWith:emphasis
  1205 emphasizeAllWith:emphasis
  1189     "change the emphasis of all characters"
  1206     "change the emphasis of all characters"
  1190 
  1207 
  1191     runs := RunArray new:(string size) withAll:emphasis
  1208     runs := RunArray new:(string size) withAll:emphasis
  1192 
  1209 
  1648 ! !
  1665 ! !
  1649 
  1666 
  1650 !Text class methodsFor:'documentation'!
  1667 !Text class methodsFor:'documentation'!
  1651 
  1668 
  1652 version
  1669 version
  1653     ^ '$Header: /cvs/stx/stx/libbasic2/Text.st,v 1.99 2009-09-04 12:45:53 cg Exp $'
  1670     ^ '$Header: /cvs/stx/stx/libbasic2/Text.st,v 1.100 2009-09-14 17:49:05 cg Exp $'
  1654 ! !
  1671 ! !
  1655 
  1672 
  1656 Text initialize!
  1673 Text initialize!