--- a/Tools__BreakpointBrowser.st	Fri Jun 21 01:37:57 2013 +0200
+++ b/Tools__BreakpointBrowser.st	Fri Jun 21 02:18:17 2013 +0200
@@ -313,12 +313,8 @@
            (Menu
               (
                (MenuItem
-                  label: 'Toggle all'
-                  itemValue: toggleAllShownTypes
-                  hideMenuOnActivated: false
-                )
-               (MenuItem
-                  label: '-'
+                  enabled: false
+                  label: '-- Coded --'
                 )
                (MenuItem
                   label: 'Assertions'
@@ -395,6 +391,10 @@
                   label: '-'
                 )
                (MenuItem
+                  enabled: false
+                  label: '-- Dynamic --'
+                )
+               (MenuItem
                   label: 'Method Breakpoints'
                   itemValue: showMethodBreakpoints:
                   hideMenuOnActivated: false
@@ -410,6 +410,24 @@
                   label: '-'
                 )
                (MenuItem
+                  label: 'Toggle all'
+                  itemValue: toggleAllShownTypes
+                  hideMenuOnActivated: false
+                )
+               (MenuItem
+                  label: 'All On'
+                  itemValue: showAllTypes
+                  hideMenuOnActivated: false
+                )
+               (MenuItem
+                  label: 'All Off'
+                  itemValue: hideAllTypes
+                  hideMenuOnActivated: false
+                )
+               (MenuItem
+                  label: '-'
+                )
+               (MenuItem
                   label: 'Update List'
                   itemValue: updateList
                 )
@@ -1641,6 +1659,10 @@
     (self selectedBreakpointListEntry) breakPoint disable
 !
 
+hideAllTypes
+    self setShowAllTypesTo:false
+!
+
 itemDoubleClicked:itemIndex
     self browseSelectedItem
 
@@ -1725,6 +1747,20 @@
     "Modified: / 18-02-2007 / 13:02:19 / cg"
 !
 
+setShowAllTypesTo:aBoolean
+    self showAssertions:aBoolean.
+    self showHalts:aBoolean.
+    self showCodeBreakpoints:aBoolean.
+    self showDebugCode:aBoolean.
+    self showLineBreakpoints:aBoolean.
+    self showMethodBreakpoints:aBoolean.
+    self showOthers:aBoolean.
+!
+
+showAllTypes
+    self setShowAllTypesTo:true
+!
+
 sortBy:instanceName
     self sortBy:instanceName withReverse:true
 
@@ -1986,11 +2022,11 @@
 !BreakpointBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__BreakpointBrowser.st,v 1.47 2013-06-20 23:37:57 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__BreakpointBrowser.st,v 1.48 2013-06-21 00:18:17 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__BreakpointBrowser.st,v 1.47 2013-06-20 23:37:57 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__BreakpointBrowser.st,v 1.48 2013-06-21 00:18:17 cg Exp $'
 ! !