Tools__NavigationState.st
branchjv
changeset 12125 0c49a3b13e43
parent 12123 4bde08cebd48
child 12128 a7ff7d66ee85
--- a/Tools__NavigationState.st	Sun Jan 29 12:56:58 2012 +0000
+++ b/Tools__NavigationState.st	Sun Jan 29 15:33:37 2012 +0000
@@ -35,7 +35,8 @@
 		messageSpecHolder messageHolder progressHolder tabContentView
 		messagePaneView codePaneAndPluginView
 		codePaneAndPluginViewRelativeCorners pluginVisibleHolder
-		bookmarkHolder worker'
+		bookmarkHolder worker packageInfoBackgroundColorHolder
+		packageInfoButton'
 	classVariableNames:''
 	poolDictionaries:''
 	category:'Interface-Browsers-New'
@@ -455,6 +456,14 @@
     "Created: / 08-08-2011 / 15:32:23 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
+packageInfoButton
+    ^ packageInfoButton
+!
+
+packageInfoButton:something
+    packageInfoButton := something.
+!
+
 scrollableCodeView
     scrollableCodeView isNil ifTrue:[
         scrollableCodeView := self setUpScrollableCodeView.
@@ -851,6 +860,16 @@
     "Created: / 24.2.2000 / 23:45:28 / cg"
 !
 
+packageInfoBackgroundColorHolder
+
+    packageInfoBackgroundColorHolder isNil ifTrue:[
+        packageInfoBackgroundColorHolder := nil asValue.
+    ].
+    ^ packageInfoBackgroundColorHolder
+
+    "Created: / 03-10-2011 / 14:04:01 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+!
+
 packageLabelHolder
     packageLabelHolder isNil ifTrue:[
         packageLabelHolder := '' asValue.
@@ -1633,9 +1652,9 @@
 !NavigationState class methodsFor:'documentation'!
 
 version_CVS
-    ^ '§Header: /cvs/stx/stx/libtool/Tools_NavigationState.st,v 1.39 2011/08/08 14:36:37 vrany Exp §'
+    ^ '§Header: /cvs/stx/stx/libtool/Tools_NavigationState.st,v 1.40 2011/10/03 16:16:49 vrany Exp §'
 !
 
 version_SVN
-    ^ '$Id: Tools__NavigationState.st 7810 2011-08-12 14:54:02Z vranyj1 $'
-! !
\ No newline at end of file
+    ^ '$Id: Tools__NavigationState.st 7851 2012-01-29 15:33:37Z vranyj1 $'
+! !