#FEATURE by cg
class: ExternalStreamMonitor
class definition
class: ExternalStreamMonitor class
changed: #mainMenu
--- a/ExternalStreamMonitor.st Mon Oct 29 15:21:03 2018 +0100
+++ b/ExternalStreamMonitor.st Mon Oct 29 15:21:11 2018 +0100
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
"
COPYRIGHT (c) 1997 by Claus Gittinger
All Rights Reserved
@@ -135,17 +133,11 @@
(
(MenuItem
label: 'File'
- submenu:
- (Menu
- (
- (MenuItem
- label: 'Exit'
- itemValue: closeRequestToTopView
- )
- )
- nil
- nil
- )
+ submenuChannel: fileMenu
+ )
+ (MenuItem
+ label: 'View'
+ submenuChannel: viewMenu
)
(MenuItem
label: 'Filter'
@@ -159,8 +151,6 @@
nil
nil
)
-
- "Modified: / 07-04-2017 / 14:21:44 / cg"
!
operationsMenu