Tools__TagsBrowser.st
changeset 11503 7105b74e84c3
parent 11498 b14061395b3a
child 11721 a0857582353c
--- 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