#FEATURE by exept
class: NewLauncher
added: #startOSProcessMonitor
comment/format in: #startProcessMonitor
class: NewLauncher class
changed: #systemMenu
--- a/NewLauncher.st Fri Aug 30 11:08:52 2019 +0200
+++ b/NewLauncher.st Fri Aug 30 11:25:00 2019 +0200
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
"
COPYRIGHT (c) 1997-1998 by eXept Software AG
All Rights Reserved
@@ -2547,6 +2549,11 @@
itemValue: startProcessMonitor
)
(MenuItem
+ activeHelpKey: osProcesses
+ label: 'OS Processes'
+ itemValue: startOSProcessMonitor
+ )
+ (MenuItem
activeHelpKey: systemSemaphores
label: 'Semaphores'
itemValue: openApplication:
@@ -5023,14 +5030,20 @@
in this release'.
!
+startOSProcessMonitor
+ "open an OSProcessMonitor view (showing OS processes started by me)"
+
+ self openApplication:OSProcessMonitor.
+!
+
startProcessMonitor
- "open an ProcessMonitor view"
+ "open an ProcessMonitor view (showing smalltalk threads)"
self openApplication:(
- (UserPreferences current useProcessMonitorV2
- and:[ProcessMonitorV2 notNil])
- ifTrue:['ProcessMonitorV2']
- ifFalse:['ProcessMonitor']).
+ (UserPreferences current useProcessMonitorV2
+ and:[ProcessMonitorV2 notNil])
+ ifTrue:['ProcessMonitorV2']
+ ifFalse:['ProcessMonitor']).
!
startSQLScratchpad