--- a/Launcher.st	Mon Feb 26 23:54:18 1996 +0100
+++ b/Launcher.st	Tue Feb 27 00:29:59 1996 +0100
@@ -2247,7 +2247,7 @@
     (fontPref match:enc) ifFalse:[
         (self confirm:'menu font is not ' , fontPref , '-encoded.\\Change it ?' withCRs)
         ifTrue:[
-            self defaultFontSettings.
+            self fontSettings.
         ]
     ].
 
@@ -2255,7 +2255,7 @@
     self class open.
     Transcript contents:contents; hideCursor; scrollToBottom; cursorToEnd; showCursor
 
-    "Modified: 26.2.1996 / 22:49:56 / cg"
+    "Modified: 27.2.1996 / 00:04:01 / cg"
 !
 
 saveAllViews
@@ -2296,5 +2296,5 @@
 !NewLauncher class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Launcher.st,v 1.88 1996-02-26 22:43:38 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Launcher.st,v 1.89 1996-02-26 23:29:59 cg Exp $'
 ! !