--- a/FontPanel.st Fri Mar 05 20:19:15 2004 +0100
+++ b/FontPanel.st Fri Mar 05 20:26:43 2004 +0100
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
"
COPYRIGHT (c) 1991 by Claus Gittinger
All Rights Reserved
@@ -152,13 +154,13 @@
'The quick brown fox
jumps over the lazy dog.
-,'
+日本語'
!
defaultLatin1SampleString
"return the sample latin1 preview text"
- ^ (self defaultAsciiSampleString) , 'ũ'.
+ ^ (self defaultAsciiSampleString) , 'äöüÄÖÜßéèêå©'
!
defaultSampleStringForEncoding:enc
@@ -198,12 +200,19 @@
|t|
t := (self defaultAsciiSampleString) , '
-diaresis:
-accent:
-cyrillic: CAA:>
-greek:
-japanese: ,'.
+diaresis: äöüÄÖÜß
+accent: éèêåÅ
+cyrillic: Русско' , '
+greek: ' ,
+(UnicodeString fromString:(#(16r395 16r3BB 16r3BB 16r3B7 16r3BD 16r3B9 16r3BA 16r3AC) collect:[:c | Character value:c])) ,
+'
+japanese: ' ,
+(UnicodeString fromString:(#(16r65E5 16r672C 16r8A9E) collect:[:c | Character value:c])) ,
+'
+'.
^ t
+
+ "Modified: 29.4.1996 / 09:46:19 / cg"
!
sampleStringWithAllLetters
@@ -929,5 +938,5 @@
!FontPanel class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libwidg/FontPanel.st,v 1.77 2004-03-05 19:19:15 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg/FontPanel.st,v 1.78 2004-03-05 19:26:43 cg Exp $'
! !