--- a/Tools__TagsBrowser.st	Sat Mar 24 20:06:03 2012 +0100
+++ b/Tools__TagsBrowser.st	Sat Mar 24 23:25:38 2012 +0100
@@ -161,7 +161,7 @@
           )
          (MenuItem
             enabled: tagTypesPresentHolder
-            label: 'Hide local labels'
+            label: 'Hide local labels (starting with ".")'
             translateLabel: true
             isVisible: editedFileHasAssemblerSuffix
             hideMenuOnActivated: false
@@ -169,6 +169,14 @@
           )
          (MenuItem
             enabled: tagTypesPresentHolder
+            label: 'Hide local labels2 (not starting with "_")'
+            translateLabel: true
+            isVisible: editedFileHasAssemblerSuffix
+            hideMenuOnActivated: false
+            indication: hideLocalLabels2:
+          )
+         (MenuItem
+            enabled: tagTypesPresentHolder
             label: 'Hide data labels'
             translateLabel: true
             isVisible: editedFileHasAssemblerSuffix
@@ -187,6 +195,8 @@
         nil
         nil
       )
+
+    "Modified: / 24-03-2012 / 23:22:45 / cg"
 !
 
 cMenuSlice
@@ -1287,6 +1297,19 @@
     ^ tagList hideLocalLabels
 !
 
+hideLocalLabels2
+    ^ tagList hideLocalLabels2
+
+    "Created: / 24-03-2012 / 23:23:43 / cg"
+!
+
+hideLocalLabels2:aBool
+    tagList hideLocalLabels2:aBool.
+    self updateTagList
+
+    "Created: / 24-03-2012 / 23:23:26 / cg"
+!
+
 hideLocalLabels:aBool
     tagList hideLocalLabels:aBool.
     self updateTagList
@@ -2249,11 +2272,11 @@
 !TagsBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__TagsBrowser.st,v 1.23 2012-03-17 10:16:19 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__TagsBrowser.st,v 1.24 2012-03-24 22:25:38 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__TagsBrowser.st,v 1.23 2012-03-17 10:16:19 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__TagsBrowser.st,v 1.24 2012-03-24 22:25:38 cg Exp $'
 !
 
 version_SVN