class: ExtendedComboBox
changed:
#createEditField
#preferredExtent
access font via message send
--- a/ExtendedComboBox.st Thu Feb 13 19:31:54 2014 +0100
+++ b/ExtendedComboBox.st Thu Feb 13 19:38:46 2014 +0100
@@ -695,7 +695,7 @@
fieldPref := menuField preferredExtent.
buttonPref := menuButton preferredExtent.
- f := 2 + font maxHeight + (font maxDescent * 2) + (menuField margin * 2).
+ f := 2 + gc font maxHeight + (gc font maxDescent * 2) + (menuField margin * 2).
h := (fieldPref y max:f) max:buttonPref y.
m := margin max:1.
h := h + m + m.
@@ -962,7 +962,7 @@
menuField menuHolder:(self menuHolder).
menuField model:model.
- menuField font:font.
+ menuField font:self font.
self shown ifTrue:[ menuField realize ].
!
@@ -1548,10 +1548,10 @@
!ExtendedComboBox class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libwidg2/ExtendedComboBox.st,v 1.67 2013-01-17 10:43:29 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg2/ExtendedComboBox.st,v 1.68 2014-02-13 18:38:46 stefan Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libwidg2/ExtendedComboBox.st,v 1.67 2013-01-17 10:43:29 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg2/ExtendedComboBox.st,v 1.68 2014-02-13 18:38:46 stefan Exp $'
! !