--- 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 $'
! !