Tools__FontSettingsApplication.st
changeset 14569 9de61339e34d
parent 14494 680379a3dbef
child 14618 b04034550c3c
--- a/Tools__FontSettingsApplication.st	Thu Jul 03 13:57:44 2014 +0200
+++ b/Tools__FontSettingsApplication.st	Thu Jul 03 14:01:06 2014 +0200
@@ -184,6 +184,7 @@
                    hasKeyboardFocusInitially: false
                    extent: (Point 635 132)
                    viewClassName: 'ListView'
+                   postBuildCallback: postBuildHelpLabel:
                  )
                 (ViewSpec
                    name: 'CodeBox'
@@ -1162,6 +1163,12 @@
     buttonsLabel := aWidget.
 !
 
+postBuildHelpLabel:aWidget
+    aWidget level:0.
+    aWidget scrolledView backgroundColor:self window viewBackground.
+    aWidget font:(Label defaultFont).
+!
+
 postBuildInputFieldFontLabel:aWidget
 
     inputFieldLabel := aWidget.
@@ -1223,10 +1230,10 @@
 !FontSettingsApplication class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__FontSettingsApplication.st,v 1.6 2014-06-13 21:52:24 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__FontSettingsApplication.st,v 1.7 2014-07-03 12:01:06 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__FontSettingsApplication.st,v 1.6 2014-06-13 21:52:24 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__FontSettingsApplication.st,v 1.7 2014-07-03 12:01:06 cg Exp $'
 ! !