--- a/ToolApplicationModel.st	Wed Feb 17 01:09:13 1999 +0100
+++ b/ToolApplicationModel.st	Thu Feb 18 13:58:09 1999 +0100
@@ -642,7 +642,49 @@
     "Modified: / 19.5.1998 / 21:44:09 / cg"
 !
 
-menuFont
+menuHelp
+    "This resource specification was automatically generated
+     by the MenuEditor of ST/X."
+
+    "Do not manually edit this!! If it is corrupted,
+     the MenuEditor may not be able to read the specification."
+
+    "
+     MenuEditor new openOnClass:ToolApplicationModel andSelector:#menuHelp
+     (Menu new fromLiteralArrayEncoding:(ToolApplicationModel menuHelp)) startUp
+    "
+
+    <resource: #menu>
+
+    ^
+     
+       #(#Menu
+          
+           #(
+             #(#MenuItem
+                #label: 'Documentation'
+                #translateLabel: true
+                #value: #openDocumentation
+                #activeHelpKey: #helpTutorial
+                #enabled: #valueOfHavingDocumentation
+            )
+             #(#MenuItem
+                #label: '-'
+            )
+             #(#MenuItem
+                #label: 'Show Help Texts'
+                #translateLabel: true
+                #activeHelpKey: #helpShowHelp
+                #indication: #showingHelp:
+            )
+          ) nil
+          nil
+      )
+
+    "Modified: / 31.7.1998 / 18:19:42 / cg"
+!
+
+xxxmenuFont
     "This resource specification was automatically generated
      by the MenuEditor of ST/X."
 
@@ -716,48 +758,6 @@
       )
 
     "Modified: / 31.7.1998 / 18:55:34 / cg"
-!
-
-menuHelp
-    "This resource specification was automatically generated
-     by the MenuEditor of ST/X."
-
-    "Do not manually edit this!! If it is corrupted,
-     the MenuEditor may not be able to read the specification."
-
-    "
-     MenuEditor new openOnClass:ToolApplicationModel andSelector:#menuHelp
-     (Menu new fromLiteralArrayEncoding:(ToolApplicationModel menuHelp)) startUp
-    "
-
-    <resource: #menu>
-
-    ^
-     
-       #(#Menu
-          
-           #(
-             #(#MenuItem
-                #label: 'Documentation'
-                #translateLabel: true
-                #value: #openDocumentation
-                #activeHelpKey: #helpTutorial
-                #enabled: #valueOfHavingDocumentation
-            )
-             #(#MenuItem
-                #label: '-'
-            )
-             #(#MenuItem
-                #label: 'Show Help Texts'
-                #translateLabel: true
-                #activeHelpKey: #helpShowHelp
-                #indication: #showingHelp:
-            )
-          ) nil
-          nil
-      )
-
-    "Modified: / 31.7.1998 / 18:19:42 / cg"
 ! !
 
 !ToolApplicationModel class methodsFor:'queries'!
@@ -1099,7 +1099,7 @@
     ^window minExtent max: (preferredExtentOfWindow min: window maxExtent)
 ! !
 
-!ToolApplicationModel methodsFor:'settings'!
+!ToolApplicationModel ignoredMethodsFor:'settings'!
 
 allFontViewsDo: aBlock
     "evaluates aBlock for all views with fonts"
@@ -1252,7 +1252,8 @@
     super postOpenWith:aBuilder.
 
     self updateInfoLabel.
-    self updateFonts.
+"/    self updateFonts.
+    self showingHelp:true
 
     "Modified: / 31.7.1998 / 18:17:34 / cg"
 !
@@ -1278,5 +1279,5 @@
 !ToolApplicationModel class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/ToolApplicationModel.st,v 1.79 1999-02-11 11:15:28 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/ToolApplicationModel.st,v 1.80 1999-02-18 12:58:09 cg Exp $'
 ! !