#UI_ENHANCEMENT by exept
authorClaus Gittinger <cg@exept.de>
Mon, 30 Dec 2019 12:46:55 +0100
changeset 19382 22a9d6d85699
parent 19381 ba6c46238c2b
child 19383 91a01357a7d7
#UI_ENHANCEMENT by exept class: NewLauncher changed: #menuChangeHistory
NewLauncher.st
--- a/NewLauncher.st	Mon Dec 30 12:46:45 2019 +0100
+++ b/NewLauncher.st	Mon Dec 30 12:46:55 2019 +0100
@@ -4303,7 +4303,8 @@
                     label: (change fullClassName , ' ' , (change selector ? '???'))
                     itemValue: [SystemBrowser default openInClass:change changeClass selector:change selector]
                     translateLabel: false;
-                    activeHelpKey: #classBrowserOnChangedMethod
+                    activeHelpKey: #classBrowserOnChangedMethod;
+                    yourself
             ]).
     ].
 
@@ -4313,7 +4314,8 @@
                 label: (resources string:'Open Change Set Browser on all Changes')
                 itemValue:#startChangeSetBrowser
                 translateLabel: false;
-                activeHelpKey: #startChangeSetBrowser
+                activeHelpKey: #startChangeSetBrowser;
+                yourself
             .
             MenuItem new
                 label: (resources string:'Open Change Browser on File...')
@@ -4321,13 +4323,14 @@
                     [ 
                         |file|
 
-                        file := Dialog requestFileName:'Change or Source File' default:ObjectMemory nameForChanges.
+                        file := Dialog requestFileName:(resources string:'Change or Source File') default:ObjectMemory nameForChanges.
                         file notEmptyOrNil ifTrue:[
                             UserPreferences current changesBrowserClass openOn:file
                         ]
                     ]
                 translateLabel: false;
-                activeHelpKey: #changeBrowserOnFile
+                activeHelpKey: #changeBrowserOnFile;
+                yourself
         }.
 
     menu findGuiResourcesIn:self.