FontPanel.st
changeset 399 13bab2f25c1e
parent 398 6f10715fef28
child 410 d3fb280141e4
--- a/FontPanel.st	Sat Feb 24 22:45:32 1996 +0100
+++ b/FontPanel.st	Sat Feb 24 23:48:38 1996 +0100
@@ -294,7 +294,7 @@
         encodingLabel label:enc.
         nameLabel notNil ifTrue:[nameLabel label:(f fullName)].
 
-        (enc notNil and:[enc startsWith:'JIS']) ifTrue:[
+        (enc notNil and:[enc startsWith:'jis']) ifTrue:[
             s := self class defaultJISSampleString
         ] ifFalse:[
             s := self class defaultRomanSampleString.
@@ -302,7 +302,7 @@
         previewField contents:s .
     ]
 
-    "Modified: 23.2.1996 / 02:57:58 / cg"
+    "Modified: 24.2.1996 / 23:47:03 / cg"
 !
 
 showSelectedFont
@@ -417,5 +417,5 @@
 !FontPanel class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/FontPanel.st,v 1.21 1996-02-24 21:45:32 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/FontPanel.st,v 1.22 1996-02-24 22:48:38 cg Exp $'
 ! !