WorkspaceApplication.st
changeset 17881 cd8858cb65b6
parent 17743 b8e718389cc7
child 18055 e9d40dac7936
--- a/WorkspaceApplication.st	Tue Jan 16 22:12:55 2018 +0100
+++ b/WorkspaceApplication.st	Tue Jan 16 22:13:01 2018 +0100
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "
  COPYRIGHT (c) 2001 by eXept Software AG
               All Rights Reserved
@@ -227,10 +229,10 @@
 
 !WorkspaceApplication class methodsFor:'help specs'!
 
-flyByHelpSpec
+helpSpec
     <resource: #help>
 
-    ^ super flyByHelpSpec addPairsFrom:#(
+    ^ super helpSpec addPairsFrom:#(
 
 #editCopy
 'Copy the selected text to the clipboard'
@@ -2700,9 +2702,9 @@
 
 !WorkspaceApplication methodsFor:'help'!
 
-flyByHelpSpec
-    "/ dynamically adjust the menuSave item's flyByhelpText
-    ^ self updateHelpSpec:(super flyByHelpSpec)
+helpSpec
+    "/ dynamically adjust the menuSave item's helpText
+    ^ self updateHelpSpec:(super helpSpec)
 
     "Created: / 05-07-2011 / 15:42:25 / cg"
 !
@@ -2710,7 +2712,7 @@
 updateHelpSpec:aSpec
     |file ws|
 
-    "/ dynamically adjust the menuSave item's flyByhelpText
+    "/ dynamically adjust the menuSave item's helpText
     ws := self selectedWorkspace scrolledView.
     ws isTextView ifTrue:[
         file := ws defaultFileNameForFileDialog.