--- a/FontPanel.st	Wed Aug 18 16:44:40 1999 +0200
+++ b/FontPanel.st	Wed Aug 18 16:49:08 1999 +0200
@@ -468,7 +468,7 @@
             ]    
         ].
 
-        f := f on:device.
+        f := f onDevice:device.
         previewField font:f.
 
         enc := f encoding.
@@ -640,5 +640,5 @@
 !FontPanel class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/FontPanel.st,v 1.44 1999-03-06 02:14:14 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/FontPanel.st,v 1.45 1999-08-18 14:49:08 cg Exp $'
 ! !