--- a/Tools__TagsBrowser.st Sun May 13 11:28:08 2012 +0200
+++ b/Tools__TagsBrowser.st Sun May 13 11:30:16 2012 +0200
@@ -177,6 +177,14 @@
)
(MenuItem
enabled: tagTypesPresentHolder
+ label: 'Hide local labels3 ("L[0-9]+")'
+ translateLabel: true
+ isVisible: editedFileHasAssemblerSuffix
+ hideMenuOnActivated: false
+ indication: hideLocalLabels3:
+ )
+ (MenuItem
+ enabled: tagTypesPresentHolder
label: 'Hide data labels'
translateLabel: true
isVisible: editedFileHasAssemblerSuffix
@@ -196,7 +204,7 @@
nil
)
- "Modified: / 24-03-2012 / 23:22:45 / cg"
+ "Modified: / 13-05-2012 / 11:26:28 / cg"
!
cMenuSlice
@@ -1310,6 +1318,19 @@
"Created: / 24-03-2012 / 23:23:26 / cg"
!
+hideLocalLabels3
+ ^ tagList hideLocalLabels3
+
+ "Created: / 13-05-2012 / 11:09:54 / cg"
+!
+
+hideLocalLabels3:aBool
+ tagList hideLocalLabels3:aBool.
+ self updateTagList
+
+ "Created: / 13-05-2012 / 11:10:01 / cg"
+!
+
hideLocalLabels:aBool
tagList hideLocalLabels:aBool.
self updateTagList
@@ -2272,11 +2293,11 @@
!TagsBrowser class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/Tools__TagsBrowser.st,v 1.25 2012-05-07 12:11:54 stefan Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/Tools__TagsBrowser.st,v 1.26 2012-05-13 09:30:16 cg Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libtool/Tools__TagsBrowser.st,v 1.25 2012-05-07 12:11:54 stefan Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/Tools__TagsBrowser.st,v 1.26 2012-05-13 09:30:16 cg Exp $'
!
version_SVN