--- a/InspectorView.st Fri Mar 04 16:06:17 2016 +0000
+++ b/InspectorView.st Sun Mar 06 07:04:45 2016 +0100
@@ -1994,7 +1994,7 @@
|sel|
sel := self selection.
- (object isFilename or:[sel isFilename]) ifTrue:[
+ (object isFilename or:[sel isFilename or:[sel isString and:[sel asFilename exists]]]) ifTrue:[
OperatingSystem isMSWINDOWSlike ifTrue:[
^ #(
('Show in Explorer' #showInWindowsExplorer)
--- a/NewLauncher.st Fri Mar 04 16:06:17 2016 +0000
+++ b/NewLauncher.st Sun Mar 06 07:04:45 2016 +0100
@@ -2675,30 +2675,6 @@
label: '-'
)
(MenuItem
- activeHelpKey: systemInterruptLatency
- label: 'Interrupt Latency'
- itemValue: startLatencyMonitor
- isVisible: false
- )
- (MenuItem
- label: '-'
- isVisible: false
- )
- (MenuItem
- activeHelpKey: systemEventView
- label: 'Event View'
- itemValue: openApplication:
- argument: 'EventMonitor'
- )
- (MenuItem
- activeHelpKey: systemEventTrace
- label: 'Event Trace'
- itemValue: startStopEventTrace
- )
- (MenuItem
- label: '-'
- )
- (MenuItem
activeHelpKey: systemGarbageCollect
label: 'Collect Garbage'
itemValue: garbageCollect
@@ -2886,6 +2862,30 @@
itemValue: timestampTranscriptMessages:
indication: timestampTranscriptMessages
)
+ (MenuItem
+ label: '-'
+ )
+ (MenuItem
+ activeHelpKey: systemInterruptLatency
+ label: 'Interrupt Latency'
+ itemValue: startLatencyMonitor
+ isVisible: false
+ )
+ (MenuItem
+ label: '-'
+ isVisible: false
+ )
+ (MenuItem
+ activeHelpKey: systemEventView
+ label: 'Event View'
+ itemValue: openApplication:
+ argument: 'EventMonitor'
+ )
+ (MenuItem
+ activeHelpKey: systemEventTrace
+ label: 'Event Trace'
+ itemValue: startStopEventTrace
+ )
(MenuItem
label: '-'
)