--- a/MenuEditor.st Mon Sep 21 10:01:18 2009 +0200
+++ b/MenuEditor.st Mon Sep 21 14:42:20 2009 +0200
@@ -939,12 +939,14 @@
#(Menu
(
(MenuItem
+ isVisible: isNotEditingSpecOnly
activeHelpKey: fileNew
label: 'New'
itemValue: doNew
translateLabel: true
)
(MenuItem
+ isVisible: isNotEditingSpecOnly
label: '-'
)
(MenuItem
@@ -2485,7 +2487,7 @@
!
isEditingSpecOnly
- ^ masterApplication notNil and:[ masterApplication isEditingSpecOnly ]
+ ^ masterApplication perform:#isEditingSpecOnly ifNotUnderstood:true "/ false
!
isNotEditingSpecOnly