--- a/FontPanel.st Mon Aug 11 13:58:13 1997 +0200
+++ b/FontPanel.st Mon Aug 11 13:59:22 1997 +0200
@@ -408,12 +408,12 @@
"clear the preview subview"
shown ifTrue:[
- previewField clear.
+ previewField contents:nil.
encodingLabel label:''.
].
"Created: 17.4.1996 / 15:19:16 / cg"
- "Modified: 29.4.1996 / 09:41:27 / cg"
+ "Modified: 11.8.1997 / 03:01:42 / cg"
!
extractFaceAndStyleFrom:aString
@@ -641,5 +641,5 @@
!FontPanel class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libwidg/FontPanel.st,v 1.42 1997-07-28 10:23:12 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg/FontPanel.st,v 1.43 1997-08-11 11:59:22 cg Exp $'
! !