added: #hasInfoLabel
authorClaus Gittinger <cg@exept.de>
Tue, 09 Mar 2010 12:12:43 +0100
changeset 9380 346a2a59c410
parent 9379 4fec8657865c
child 9381 7839c9193cfa
added: #hasInfoLabel changed: #infoVisibilityChanged #viewMenu
MultiViewToolApplication.st
--- a/MultiViewToolApplication.st	Tue Mar 09 10:39:50 2010 +0100
+++ b/MultiViewToolApplication.st	Tue Mar 09 12:12:43 2010 +0100
@@ -528,7 +528,7 @@
          (MenuItem
             label: 'Info'
             translateLabel: true
-            isVisible: false
+            isVisible: hasInfoLabel
             hideMenuOnActivated: false
             indication: infoVisibleHolder
           )
@@ -663,6 +663,10 @@
     ^ (self menuFor:#editToolBarMenu) decodeAsLiteralArray hasItems 
 !
 
+hasInfoLabel
+    ^ false
+!
+
 infoVisibleHolder
     |holder|
 
@@ -748,7 +752,7 @@
 
     visible := self infoVisibleHolder value.
 
-    cFrame := builder findComponentAt:#EditorNoteBook. "/ #CodeView.
+    cFrame := builder findComponentAt:#NoteBook. "/ #CodeView.
     cFrame notNil ifTrue:[    
         visible ifFalse:[
             bottomOffset := 0.   
@@ -1330,9 +1334,9 @@
 !MultiViewToolApplication class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/MultiViewToolApplication.st,v 1.34 2009-10-30 11:52:25 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/MultiViewToolApplication.st,v 1.35 2010-03-09 11:12:43 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/MultiViewToolApplication.st,v 1.34 2009-10-30 11:52:25 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/MultiViewToolApplication.st,v 1.35 2010-03-09 11:12:43 cg Exp $'
 ! !