--- a/Tools__TagsBrowser.st Sat May 07 17:07:27 2011 +0200
+++ b/Tools__TagsBrowser.st Sun May 08 10:58:02 2011 +0200
@@ -116,46 +116,47 @@
the MenuEditor may not be able to read the specification."
"
- MenuEditor new openOnClass:CBrowser::TagsBrowser andSelector:#middleButtonMenu
- (Menu new fromLiteralArrayEncoding:(CBrowser::TagsBrowser middleButtonMenu)) startUp
+ MenuEditor new openOnClass:Tools::TagsBrowser andSelector:#assemblerMenuSlice
+ (Menu new fromLiteralArrayEncoding:(Tools::TagsBrowser assemblerMenuSlice)) startUp
"
<resource: #menu>
^
- #(#Menu
- #(
- #(#MenuItem
- #label: '-'
- #isVisible: #editedFileHasAssemblerSuffix
+ #(Menu
+ (
+ (MenuItem
+ label: '-'
+ isVisible: editedFileHasAssemblerSuffix
)
- #(#MenuItem
- #label: 'Hide local labels'
- #translateLabel: true
- #isVisible: #editedFileHasAssemblerSuffix
- #enabled: #tagTypesPresentHolder
- #indication: #hideLocalLabels:
+ (MenuItem
+ enabled: tagTypesPresentHolder
+ label: 'Hide local labels'
+ translateLabel: true
+ isVisible: editedFileHasAssemblerSuffix
+ hideMenuOnActivated: false
+ indication: hideLocalLabels:
)
- #(#MenuItem
- #label: 'Hide data labels'
- #translateLabel: true
- #isVisible: #editedFileHasAssemblerSuffix
- #enabled: #tagTypesPresentHolder
- #indication: #hideDataLabels:
+ (MenuItem
+ enabled: tagTypesPresentHolder
+ label: 'Hide data labels'
+ translateLabel: true
+ isVisible: editedFileHasAssemblerSuffix
+ hideMenuOnActivated: false
+ indication: hideDataLabels:
)
- #(#MenuItem
- #label: 'Hide text labels'
- #translateLabel: true
- #isVisible: #editedFileHasAssemblerSuffix
- #enabled: #tagTypesPresentHolder
- #indication: #hideTextLabels:
+ (MenuItem
+ enabled: tagTypesPresentHolder
+ label: 'Hide text labels'
+ translateLabel: true
+ isVisible: editedFileHasAssemblerSuffix
+ hideMenuOnActivated: false
+ indication: hideTextLabels:
)
)
nil
nil
)
-
- "Created: / 07-06-2010 / 12:01:52 / cg"
!
cMenuSlice
@@ -166,8 +167,8 @@
the MenuEditor may not be able to read the specification."
"
- MenuEditor new openOnClass:CBrowser::TagsBrowser andSelector:#cMenuSlice
- (Menu new fromLiteralArrayEncoding:(CBrowser::TagsBrowser cMenuSlice)) startUp
+ MenuEditor new openOnClass:Tools::TagsBrowser andSelector:#cMenuSlice
+ (Menu new fromLiteralArrayEncoding:(Tools::TagsBrowser cMenuSlice)) startUp
"
<resource: #menu>
@@ -237,6 +238,7 @@
label: 'Hide classes'
translateLabel: true
isVisible: editedFileHasCSuffix
+ hideMenuOnActivated: false
indication: hideClasses:
)
(MenuItem
@@ -244,6 +246,7 @@
label: 'Hide functions'
translateLabel: true
isVisible: editedFileHasCSuffix
+ hideMenuOnActivated: false
indication: hideFunctions:
)
(MenuItem
@@ -251,6 +254,7 @@
label: 'Hide variables'
translateLabel: true
isVisible: editedFileHasCSuffix
+ hideMenuOnActivated: false
indication: hideVariables:
)
(MenuItem
@@ -258,6 +262,7 @@
label: 'Hide typedefs'
translateLabel: true
isVisible: editedFileHasCSuffix
+ hideMenuOnActivated: false
indication: hideTypedefs:
)
(MenuItem
@@ -265,6 +270,7 @@
label: 'Hide structures'
translateLabel: true
isVisible: editedFileHasCSuffix
+ hideMenuOnActivated: false
indication: hideStructures:
)
(MenuItem
@@ -272,6 +278,7 @@
label: 'Hide struct members'
translateLabel: true
isVisible: editedFileHasCSuffix
+ hideMenuOnActivated: false
indication: hideStructMembers:
)
(MenuItem
@@ -279,6 +286,7 @@
label: 'Hide defines'
translateLabel: true
isVisible: editedFileHasCSuffix
+ hideMenuOnActivated: false
indication: hideDefines:
)
(MenuItem
@@ -290,6 +298,7 @@
label: 'Hide static'
translateLabel: true
isVisible: editedFileHasCSuffix
+ hideMenuOnActivated: false
indication: hideStatic:
)
)
@@ -306,78 +315,80 @@
the MenuEditor may not be able to read the specification."
"
- MenuEditor new openOnClass:CBrowser::TagsBrowser andSelector:#middleButtonMenu
- (Menu new fromLiteralArrayEncoding:(CBrowser::TagsBrowser middleButtonMenu)) startUp
+ MenuEditor new openOnClass:Tools::TagsBrowser andSelector:#javaMenuSlice
+ (Menu new fromLiteralArrayEncoding:(Tools::TagsBrowser javaMenuSlice)) startUp
"
<resource: #menu>
^
- #(#Menu
- #(
- #(#MenuItem
- #label: '-'
- #isVisible: #editedFileHasJavaSuffix
+ #(Menu
+ (
+ (MenuItem
+ label: '-'
+ isVisible: editedFileHasJavaSuffix
)
- #(#MenuItem
- #label: 'Classes only'
- #translateLabel: true
- #isVisible: #editedFileHasJavaSuffix
- #enabled: #tagTypesPresentHolder
- #indication: #javaClassesOnly:
+ (MenuItem
+ enabled: tagTypesPresentHolder
+ label: 'Classes only'
+ translateLabel: true
+ isVisible: editedFileHasJavaSuffix
+ indication: javaClassesOnly:
)
- #(#MenuItem
- #label: 'Methods only'
- #translateLabel: true
- #isVisible: #editedFileHasJavaSuffix
- #enabled: #tagTypesPresentHolder
- #indication: #javaMethodsOnly:
+ (MenuItem
+ enabled: tagTypesPresentHolder
+ label: 'Methods only'
+ translateLabel: true
+ isVisible: editedFileHasJavaSuffix
+ indication: javaMethodsOnly:
)
- #(#MenuItem
- #label: 'Classes && Methods only'
- #translateLabel: true
- #isVisible: #editedFileHasJavaSuffix
- #enabled: #tagTypesPresentHolder
- #indication: #javaClassesAndMethodsOnly:
+ (MenuItem
+ enabled: tagTypesPresentHolder
+ label: 'Classes && Methods only'
+ translateLabel: true
+ isVisible: editedFileHasJavaSuffix
+ indication: javaClassesAndMethodsOnly:
+ )
+ (MenuItem
+ label: '-'
+ isVisible: editedFileHasJavaSuffix
)
- #(#MenuItem
- #label: '-'
- #isVisible: #editedFileHasJavaSuffix
+ (MenuItem
+ enabled: tagTypesPresentHolder
+ label: 'Hide packages'
+ translateLabel: true
+ isVisible: editedFileHasJavaSuffix
+ hideMenuOnActivated: false
+ indication: hideJavaPackages:
)
- #(#MenuItem
- #label: 'Hide packages'
- #translateLabel: true
- #isVisible: #editedFileHasJavaSuffix
- #enabled: #tagTypesPresentHolder
- #indication: #hideJavaPackages:
+ (MenuItem
+ enabled: tagTypesPresentHolder
+ label: 'Hide classes'
+ translateLabel: true
+ isVisible: editedFileHasJavaSuffix
+ hideMenuOnActivated: false
+ indication: hideJavaClasses:
)
- #(#MenuItem
- #label: 'Hide classes'
- #translateLabel: true
- #isVisible: #editedFileHasJavaSuffix
- #enabled: #tagTypesPresentHolder
- #indication: #hideJavaClasses:
+ (MenuItem
+ enabled: tagTypesPresentHolder
+ label: 'Hide methods'
+ translateLabel: true
+ isVisible: editedFileHasJavaSuffix
+ hideMenuOnActivated: false
+ indication: hideJavaMethods:
)
- #(#MenuItem
- #label: 'Hide methods'
- #translateLabel: true
- #isVisible: #editedFileHasJavaSuffix
- #enabled: #tagTypesPresentHolder
- #indication: #hideJavaMethods:
- )
- #(#MenuItem
- #label: 'Hide fields'
- #translateLabel: true
- #isVisible: #editedFileHasJavaSuffix
- #enabled: #tagTypesPresentHolder
- #indication: #hideJavaFields:
+ (MenuItem
+ enabled: tagTypesPresentHolder
+ label: 'Hide fields'
+ translateLabel: true
+ isVisible: editedFileHasJavaSuffix
+ hideMenuOnActivated: false
+ indication: hideJavaFields:
)
)
nil
nil
)
-
- "Created: / 07-06-2010 / 12:00:49 / cg"
!
javaScriptMenuSlice
@@ -388,57 +399,39 @@
the MenuEditor may not be able to read the specification."
"
- MenuEditor new openOnClass:CBrowser::TagsBrowser andSelector:#middleButtonMenu
- (Menu new fromLiteralArrayEncoding:(CBrowser::TagsBrowser middleButtonMenu)) startUp
+ MenuEditor new openOnClass:Tools::TagsBrowser andSelector:#javaScriptMenuSlice
+ (Menu new fromLiteralArrayEncoding:(Tools::TagsBrowser javaScriptMenuSlice)) startUp
"
<resource: #menu>
^
- #(#Menu
- #(
- #(#MenuItem
- #label: '-'
- #isVisible: #editedFileHasJavaScriptSuffix
- )
- #(#MenuItem
- #label: 'Functions only'
- #translateLabel: true
- #isVisible: #editedFileHasJavaScriptSuffix
- #enabled: #tagTypesPresentHolder
- #indication: #functionsOnly:
+ #(Menu
+ (
+ (MenuItem
+ label: '-'
+ isVisible: editedFileHasJavaScriptSuffix
)
- #(#MenuItem
- #label: 'Variables only'
- #translateLabel: true
- #isVisible: #editedFileHasJavaScriptSuffix
- #enabled: #tagTypesPresentHolder
- #indication: #variablesOnly:
+ (MenuItem
+ enabled: tagTypesPresentHolder
+ label: 'Functions only'
+ translateLabel: true
+ isVisible: editedFileHasJavaScriptSuffix
+ hideMenuOnActivated: false
+ indication: functionsOnly:
)
-"/ #(#MenuItem
-"/ #label: '-'
-"/ #isVisible: #editedFileHasJavaScriptSuffix
-"/ )
-"/ #(#MenuItem
-"/ #label: 'Hide Functions'
-"/ #translateLabel: true
-"/ #isVisible: #editedFileHasJavaScriptSuffix
-"/ #enabled: #tagTypesPresentHolder
-"/ #indication: #hideFunctions:
-"/ )
-"/ #(#MenuItem
-"/ #label: 'Hide Variables'
-"/ #translateLabel: true
-"/ #isVisible: #editedFileHasJavaScriptSuffix
-"/ #enabled: #tagTypesPresentHolder
-"/ #indication: #hideVariables:
-"/ )
+ (MenuItem
+ enabled: tagTypesPresentHolder
+ label: 'Variables only'
+ translateLabel: true
+ isVisible: editedFileHasJavaScriptSuffix
+ hideMenuOnActivated: false
+ indication: variablesOnly:
+ )
)
nil
nil
)
-
- "Created: / 28-06-2010 / 13:08:56 / cg"
!
lispMenuSlice
@@ -449,8 +442,8 @@
the MenuEditor may not be able to read the specification."
"
- MenuEditor new openOnClass:CBrowser::TagsBrowser andSelector:#lispMenuSlice
- (Menu new fromLiteralArrayEncoding:(CBrowser::TagsBrowser lispMenuSlice)) startUp
+ MenuEditor new openOnClass:Tools::TagsBrowser andSelector:#lispMenuSlice
+ (Menu new fromLiteralArrayEncoding:(Tools::TagsBrowser lispMenuSlice)) startUp
"
<resource: #menu>
@@ -464,6 +457,13 @@
)
(MenuItem
enabled: tagTypesPresentHolder
+ label: 'Documentation only'
+ translateLabel: true
+ isVisible: editedFileHasLispSuffix
+ indication: documentationOnly:
+ )
+ (MenuItem
+ enabled: tagTypesPresentHolder
label: 'Classes only'
translateLabel: true
isVisible: editedFileHasLispSuffix
@@ -503,9 +503,18 @@
)
(MenuItem
enabled: tagTypesPresentHolder
+ label: 'Hide documentation'
+ translateLabel: true
+ isVisible: editedFileHasLispSuffix
+ hideMenuOnActivated: false
+ indication: hideDocumentation:
+ )
+ (MenuItem
+ enabled: tagTypesPresentHolder
label: 'Hide classes'
translateLabel: true
isVisible: editedFileHasLispSuffix
+ hideMenuOnActivated: false
indication: hideClasses:
)
(MenuItem
@@ -513,6 +522,7 @@
label: 'Hide methods'
translateLabel: true
isVisible: editedFileHasLispSuffix
+ hideMenuOnActivated: false
indication: hideLispMethods:
)
(MenuItem
@@ -520,6 +530,7 @@
label: 'Hide functions'
translateLabel: true
isVisible: editedFileHasLispSuffix
+ hideMenuOnActivated: false
indication: hideFunctions:
)
(MenuItem
@@ -527,6 +538,7 @@
label: 'Hide variables'
translateLabel: true
isVisible: editedFileHasLispSuffix
+ hideMenuOnActivated: false
indication: hideVariables:
)
(MenuItem
@@ -534,6 +546,7 @@
label: 'Hide macros'
translateLabel: true
isVisible: editedFileHasLispSuffix
+ hideMenuOnActivated: false
indication: hideLispMacros:
)
(MenuItem
@@ -541,6 +554,7 @@
label: 'Hide constants'
translateLabel: true
isVisible: editedFileHasLispSuffix
+ hideMenuOnActivated: false
indication: hideLispConstants:
)
(MenuItem
@@ -548,6 +562,7 @@
label: 'Hide evaluations'
translateLabel: true
isVisible: editedFileHasLispSuffix
+ hideMenuOnActivated: false
indication: hideLispEvaluations:
)
(MenuItem
@@ -555,6 +570,7 @@
label: 'Hide structs'
translateLabel: true
isVisible: editedFileHasLispSuffix
+ hideMenuOnActivated: false
indication: hideStructures:
)
)
@@ -571,32 +587,31 @@
the MenuEditor may not be able to read the specification."
"
- MenuEditor new openOnClass:CBrowser::TagsBrowser andSelector:#middleButtonMenu
- (Menu new fromLiteralArrayEncoding:(CBrowser::TagsBrowser middleButtonMenu)) startUp
+ MenuEditor new openOnClass:Tools::TagsBrowser andSelector:#makefileMenuSlice
+ (Menu new fromLiteralArrayEncoding:(Tools::TagsBrowser makefileMenuSlice)) startUp
"
<resource: #menu>
^
- #(#Menu
- #(
- #(#MenuItem
- #label: '-'
- #isVisible: #editedFileIsMakefile
+ #(Menu
+ (
+ (MenuItem
+ label: '-'
+ isVisible: editedFileIsMakefile
)
- #(#MenuItem
- #label: 'Targets only'
- #translateLabel: true
- #isVisible: #editedFileIsMakefile
- #enabled: #tagTypesPresentHolder
- #indication: #targetsOnly:
+ (MenuItem
+ enabled: tagTypesPresentHolder
+ label: 'Targets only'
+ translateLabel: true
+ isVisible: editedFileIsMakefile
+ hideMenuOnActivated: false
+ indication: targetsOnly:
)
)
nil
nil
)
-
- "Created: / 07-06-2010 / 12:03:19 / cg"
!
middleButtonMenu
@@ -728,46 +743,47 @@
the MenuEditor may not be able to read the specification."
"
- MenuEditor new openOnClass:CBrowser::TagsBrowser andSelector:#middleButtonMenu
- (Menu new fromLiteralArrayEncoding:(CBrowser::TagsBrowser middleButtonMenu)) startUp
+ MenuEditor new openOnClass:Tools::TagsBrowser andSelector:#ozMenuSlice
+ (Menu new fromLiteralArrayEncoding:(Tools::TagsBrowser ozMenuSlice)) startUp
"
<resource: #menu>
^
- #(#Menu
- #(
- #(#MenuItem
- #label: '-'
- #isVisible: #editedFileHasOzSuffix
+ #(Menu
+ (
+ (MenuItem
+ label: '-'
+ isVisible: editedFileHasOzSuffix
)
- #(#MenuItem
- #label: 'Hide classes'
- #translateLabel: true
- #isVisible: #editedFileHasOzSuffix
- #enabled: #tagTypesPresentHolder
- #indication: #hideOzClasses:
+ (MenuItem
+ enabled: tagTypesPresentHolder
+ label: 'Hide classes'
+ translateLabel: true
+ isVisible: editedFileHasOzSuffix
+ hideMenuOnActivated: false
+ indication: hideOzClasses:
)
- #(#MenuItem
- #label: 'Hide methods'
- #translateLabel: true
- #isVisible: #editedFileHasOzSuffix
- #enabled: #tagTypesPresentHolder
- #indication: #hideOzMethods:
+ (MenuItem
+ enabled: tagTypesPresentHolder
+ label: 'Hide methods'
+ translateLabel: true
+ isVisible: editedFileHasOzSuffix
+ hideMenuOnActivated: false
+ indication: hideOzMethods:
)
- #(#MenuItem
- #label: 'Hide functions'
- #translateLabel: true
- #isVisible: #editedFileHasOzSuffix
- #enabled: #tagTypesPresentHolder
- #indication: #hideOzFunctions:
+ (MenuItem
+ enabled: tagTypesPresentHolder
+ label: 'Hide functions'
+ translateLabel: true
+ isVisible: editedFileHasOzSuffix
+ hideMenuOnActivated: false
+ indication: hideOzFunctions:
)
)
nil
nil
)
-
- "Created: / 07-06-2010 / 12:02:49 / cg"
!
pythonMenuSlice
@@ -778,71 +794,72 @@
the MenuEditor may not be able to read the specification."
"
- MenuEditor new openOnClass:CBrowser::TagsBrowser andSelector:#middleButtonMenu
- (Menu new fromLiteralArrayEncoding:(CBrowser::TagsBrowser middleButtonMenu)) startUp
+ MenuEditor new openOnClass:Tools::TagsBrowser andSelector:#pythonMenuSlice
+ (Menu new fromLiteralArrayEncoding:(Tools::TagsBrowser pythonMenuSlice)) startUp
"
<resource: #menu>
^
- #(#Menu
- #(
- #(#MenuItem
- #label: '-'
- #isVisible: #editedFileHasPythonSuffix
+ #(Menu
+ (
+ (MenuItem
+ label: '-'
+ isVisible: editedFileHasPythonSuffix
+ )
+ (MenuItem
+ enabled: tagTypesPresentHolder
+ label: 'Classes only'
+ translateLabel: true
+ isVisible: editedFileHasPythonSuffix
+ indication: pythonClassesOnly:
)
- #(#MenuItem
- #label: 'Classes only'
- #translateLabel: true
- #isVisible: #editedFileHasPythonSuffix
- #enabled: #tagTypesPresentHolder
- #indication: #pythonClassesOnly:
+ (MenuItem
+ enabled: tagTypesPresentHolder
+ label: 'Methods only'
+ translateLabel: true
+ isVisible: editedFileHasPythonSuffix
+ indication: pythonMethodsOnly:
)
- #(#MenuItem
- #label: 'Methods only'
- #translateLabel: true
- #isVisible: #editedFileHasPythonSuffix
- #enabled: #tagTypesPresentHolder
- #indication: #pythonMethodsOnly:
+ (MenuItem
+ enabled: tagTypesPresentHolder
+ label: 'Functions only'
+ translateLabel: true
+ isVisible: editedFileHasPythonSuffix
+ indication: pythonFunctionsOnly:
)
- #(#MenuItem
- #label: 'Functions only'
- #translateLabel: true
- #isVisible: #editedFileHasPythonSuffix
- #enabled: #tagTypesPresentHolder
- #indication: #pythonFunctionsOnly:
+ (MenuItem
+ label: '-'
+ isVisible: editedFileHasPythonSuffix
)
- #(#MenuItem
- #label: '-'
- #isVisible: #editedFileHasPythonSuffix
+ (MenuItem
+ enabled: tagTypesPresentHolder
+ label: 'Hide classes'
+ translateLabel: true
+ isVisible: editedFileHasPythonSuffix
+ hideMenuOnActivated: false
+ indication: hidePythonClasses:
)
- #(#MenuItem
- #label: 'Hide classes'
- #translateLabel: true
- #isVisible: #editedFileHasPythonSuffix
- #enabled: #tagTypesPresentHolder
- #indication: #hidePythonClasses:
+ (MenuItem
+ enabled: tagTypesPresentHolder
+ label: 'Hide methods'
+ translateLabel: true
+ isVisible: editedFileHasPythonSuffix
+ hideMenuOnActivated: false
+ indication: hidePythonMethods:
)
- #(#MenuItem
- #label: 'Hide methods'
- #translateLabel: true
- #isVisible: #editedFileHasPythonSuffix
- #enabled: #tagTypesPresentHolder
- #indication: #hidePythonMethods:
- )
- #(#MenuItem
- #label: 'Hide functions'
- #translateLabel: true
- #isVisible: #editedFileHasPythonSuffix
- #enabled: #tagTypesPresentHolder
- #indication: #hidePythonFunctions:
+ (MenuItem
+ enabled: tagTypesPresentHolder
+ label: 'Hide functions'
+ translateLabel: true
+ isVisible: editedFileHasPythonSuffix
+ hideMenuOnActivated: false
+ indication: hidePythonFunctions:
)
)
nil
nil
)
-
- "Created: / 07-06-2010 / 12:02:12 / cg"
!
tclMenuSlice
@@ -853,32 +870,31 @@
the MenuEditor may not be able to read the specification."
"
- MenuEditor new openOnClass:CBrowser::TagsBrowser andSelector:#middleButtonMenu
- (Menu new fromLiteralArrayEncoding:(CBrowser::TagsBrowser middleButtonMenu)) startUp
+ MenuEditor new openOnClass:Tools::TagsBrowser andSelector:#tclMenuSlice
+ (Menu new fromLiteralArrayEncoding:(Tools::TagsBrowser tclMenuSlice)) startUp
"
<resource: #menu>
^
- #(#Menu
- #(
- #(#MenuItem
- #label: '-'
- #isVisible: #editedFileHasTCLSuffix
+ #(Menu
+ (
+ (MenuItem
+ label: '-'
+ isVisible: editedFileHasTCLSuffix
)
- #(#MenuItem
- #label: 'Hide variables'
- #translateLabel: true
- #isVisible: #editedFileHasTCLSuffix
- #enabled: #tagTypesPresentHolder
- #indication: #hideVariables:
+ (MenuItem
+ enabled: tagTypesPresentHolder
+ label: 'Hide variables'
+ translateLabel: true
+ isVisible: editedFileHasTCLSuffix
+ hideMenuOnActivated: false
+ indication: hideVariables:
)
)
nil
nil
)
-
- "Created: / 07-06-2010 / 12:01:24 / cg"
! !
!TagsBrowser methodsFor:'accessing'!
@@ -979,6 +995,22 @@
self updateTagList
!
+documentationOnly
+ ^ tagList documentationOnly
+
+ "Created: / 08-05-2011 / 10:50:52 / cg"
+!
+
+documentationOnly:aBool
+ aBool ifTrue:[
+ tagList hideDocumentation:false.
+ ].
+ tagList documentationOnly:aBool.
+ self updateTagList
+
+ "Created: / 08-05-2011 / 10:51:03 / cg"
+!
+
functionsAndVariablesOnly
^ tagList functionsAndVariablesOnly
!
@@ -1031,6 +1063,19 @@
self updateTagList
!
+hideDocumentation
+ ^ tagList hideDocumentation
+
+ "Created: / 08-05-2011 / 10:56:45 / cg"
+!
+
+hideDocumentation:aBool
+ tagList hideDocumentation:aBool.
+ self updateTagList
+
+ "Created: / 08-05-2011 / 10:56:49 / cg"
+!
+
hideFunctionProtoTypes
^ tagList hideFunctionProtoTypes
!
@@ -2008,5 +2053,5 @@
!TagsBrowser class methodsFor:'documentation'!
version_CVS
- ^ '$Header: /cvs/stx/stx/libtool/Tools__TagsBrowser.st,v 1.5 2011-05-07 15:07:27 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/Tools__TagsBrowser.st,v 1.6 2011-05-08 08:58:02 cg Exp $'
! !