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.
changed: #initStyle
authorClaus Gittinger <cg@exept.de>
Mon, 07 Dec 2009 15:49:53 +0100
changeset 4127 003405300276
parent 4126 8917e016c107
child 4128 2fd581e2cf68
changed: #initStyle default to label-font first
FramedBox.st file | annotate | diff | comparison | revisions 
--- a/FramedBox.st	Fri Dec 04 14:22:33 2009 +0100
+++ b/FramedBox.st	Mon Dec 07 15:49:53 2009 +0100
@@ -668,7 +668,7 @@
     fgColor := StyleSheet at:'framedBox.foregroundColor' default:Black.
     labelPosition := StyleSheet at:'framedBox.labelPosition' default:#topCenter.
     frame3D := StyleSheet at:'framedBox.3DFrame' default:true.
-    font := StyleSheet at:'framedBox.font' default:font.
+    font := StyleSheet at:'framedBox.font' default:(StyleSheet at:'label.font' default:font).
     font := font onDevice:device.
     self borderWidth:0.
 
@@ -765,9 +765,9 @@
 !FramedBox class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/FramedBox.st,v 1.52 2009-10-23 15:22:27 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/FramedBox.st,v 1.53 2009-12-07 14:49:53 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libwidg/FramedBox.st,v 1.52 2009-10-23 15:22:27 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/FramedBox.st,v 1.53 2009-12-07 14:49:53 cg Exp $'
 ! !
hg/stx-libwidg