MenuPanel.st
changeset 6169 790a711a993f
parent 6164 d3a8ae6f6043
child 6172 59436c79e1e4
--- a/MenuPanel.st	Wed Oct 16 16:12:26 2019 +0200
+++ b/MenuPanel.st	Wed Oct 16 16:12:46 2019 +0200
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
 "
  COPYRIGHT (c) 1997 by eXept Software AG
               All Rights Reserved
@@ -4715,15 +4713,6 @@
 
 !MenuPanel methodsFor:'help'!
 
-helpSpec
-    "allows subclasses to provide texts"
-
-    pluggableHelpSpecProvider notNil ifTrue:[
-        ^ pluggableHelpSpecProvider helpSpec.
-    ].    
-    ^ Dictionary new.
-!
-
 helpSpecProvider:aSpecProvider
     "pluggable helpspec provider"
 
@@ -4802,6 +4791,17 @@
     ]
 ! !
 
+!MenuPanel methodsFor:'help specs'!
+
+helpSpec
+    "allows subclasses to provide texts"
+
+    pluggableHelpSpecProvider notNil ifTrue:[
+        ^ pluggableHelpSpecProvider helpSpec.
+    ].    
+    ^ Dictionary new.
+! !
+
 !MenuPanel methodsFor:'image registration'!
 
 imageOnMyDevice:anImage
@@ -5284,7 +5284,7 @@
      we have non translated sub menus (when using them later for viewing).
      Problem expecco Menu 'View' was somethimes untranslated and somethimes not.
      Dependent if this code was called before the user did open (instantiate) the menu via the application.
-     May also the shortcuts itself could vary when translated 'Open &File' -> 'Datei &öffnen' ????"
+     May also the shortcuts itself could vary when translated 'Open &File' -> 'Datei &öffnen' ????"
     Menu::NeedResourcesQuery answer:true do:[
 "/    Menu::NeedResourcesQuery answer:false do:[
         [true] whileTrue:[