Mercurial Mercurial > hg > stx-libwidg / changeset
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | raw | zip | gz | bz2 | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
*** empty log message ***
authorClaus Gittinger <cg@exept.de>
Fri, 12 Mar 2004 19:05:38 +0100
changeset 2942 a0ef008a69f3
parent 2941 1df9eff1ddbf
child 2943 7d6cd94bff11
*** empty log message ***
FontPanel.st file | annotate | diff | comparison | revisions 
--- 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 $'
 ! !
hg/stx-libwidg