FontPanel.st
changeset 2942 a0ef008a69f3
parent 2939 1c23ad9aa8be
child 3187 ad89ff271e5a
--- a/FontPanel.st	Fri Mar 12 17:35:04 2004 +0100
+++ b/FontPanel.st	Fri Mar 12 19:05:38 2004 +0100
@@ -446,16 +446,16 @@
     l adjust:#left.
 
     encodingFilter := ComboBoxView in:box.
+    "/ encodingFilter font:l font.
     encodingFilter level:-1.
     encodingFilter contents:'*'.
     encodingFilter list:(self listOfEncodingsInFilterCombo).
     encodingFilter action:[:pattern | self encodingFilterSelected:pattern].
     encodingFilter immediateAccept:true.
-    encodingFilter font:l font.
-    encodingFilter editor font:l font.
+    "/ encodingFilter editor font:l font.
 
     eH := encodingFilter preferredExtent y.
-    box topInset:(eH negated-1); horizontalInset:mm.
+    box topInset:(eH negated-4); horizontalInset:mm.
 
 "/    encodingFilter acceptOnReturn:true.
 "/    encodingFilter acceptOnTab:true.
@@ -952,5 +952,5 @@
 !FontPanel class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/FontPanel.st,v 1.83 2004-03-11 09:53:20 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/FontPanel.st,v 1.84 2004-03-12 18:05:38 cg Exp $'
 ! !