--- a/Launcher.st	Tue Feb 27 00:55:04 1996 +0100
+++ b/Launcher.st	Tue Feb 27 01:12:42 1996 +0100
@@ -788,10 +788,10 @@
     models add:(textDef := TextView defaultFont asValue).
 
     box := Dialog new.
-    box label:'view settings'.
+    box label:(resources string:'Font settings').
 
     models
-    with:#('labels' 'buttons' 'lists' 'menus' 'edit text')
+    with:(resources array:#('labels' 'buttons' 'lists' 'menus' 'edit text'))
     do:[:model :title |
         |y2 lbl|
 
@@ -799,7 +799,7 @@
             adjust:#left.
 
         y := box yPosition.
-        b := box addComponent:(Button label:'change').
+        b := box addComponent:(Button label:(resources string:'change')).
         b relativeExtent:nil; extent:(b preferredExtent).
         y2 := box yPosition.
         box yPosition:y.
@@ -818,7 +818,8 @@
         b action:[
             |f|
 
-            f := FontPanel fontFromUserInitial:(model value).
+            f := FontPanel fontFromUserInitial:(model value) 
+                                         title:(resources string:'font for %1' with:title).
             f notNil ifTrue:[
                 model value:f.
                 lbl font:f.
@@ -849,7 +850,7 @@
 "/    ]
 
     "Created: 26.2.1996 / 22:52:51 / cg"
-    "Modified: 27.2.1996 / 00:52:37 / cg"
+    "Modified: 27.2.1996 / 01:08:48 / cg"
 !
 
 keyboardSetting 
@@ -2297,5 +2298,5 @@
 !NewLauncher class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Launcher.st,v 1.90 1996-02-26 23:55:04 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Launcher.st,v 1.91 1996-02-27 00:12:42 cg Exp $'
 ! !