--- a/FontPanel.st Wed Apr 17 14:06:50 1996 +0200
+++ b/FontPanel.st Wed Apr 17 15:11:34 1996 +0200
@@ -394,6 +394,7 @@
]
].
+ f := f on:device.
previewField font:f.
enc := f encoding.
@@ -410,7 +411,7 @@
previewField contents:s.
]
- "Modified: 1.3.1996 / 20:21:43 / cg"
+ "Modified: 17.4.1996 / 15:06:42 / cg"
!
showSelectedFont
@@ -532,5 +533,5 @@
!FontPanel class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libwidg/FontPanel.st,v 1.27 1996-03-01 19:21:58 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg/FontPanel.st,v 1.28 1996-04-17 13:11:34 cg Exp $'
! !