Tools__BreakpointBrowser.st
changeset 9045 a43cc56e8dca
parent 8859 ea979fe04ab7
child 9077 c936c0fc8ef4
--- a/Tools__BreakpointBrowser.st	Thu Oct 22 15:25:07 2009 +0200
+++ b/Tools__BreakpointBrowser.st	Thu Oct 22 15:58:02 2009 +0200
@@ -209,13 +209,13 @@
 
     <resource: #menu>
 
-    ^
+    ^ 
      #(Menu
         (
          (MenuItem
             label: 'File'
             translateLabel: true
-            submenu:
+            submenu: 
            (Menu
               (
                (MenuItem
@@ -228,10 +228,10 @@
               nil
             )
           )
-          (MenuItem
+         (MenuItem
             label: 'Selection'
             translateLabel: true
-            submenu:
+            submenu: 
            (Menu
               (
                (MenuItem
@@ -247,7 +247,7 @@
          (MenuItem
             label: 'View'
             translateLabel: true
-            submenu:
+            submenu: 
            (Menu
               (
                (MenuItem
@@ -306,19 +306,21 @@
          (MenuItem
             label: 'Enable'
             translateLabel: true
-            submenu:
+            submenu: 
            (Menu
               (
                (MenuItem
                   label: 'Assertions'
                   itemValue: enableAssertions:
                   translateLabel: true
+                  hideMenuOnActivated: false
                   indication: enableAssertions
                 )
                (MenuItem
                   label: 'Halts'
                   itemValue: enableHalts:
                   translateLabel: true
+                  hideMenuOnActivated: false
                   indication: enableHalts
                 )
                (MenuItem
@@ -338,7 +340,7 @@
             label: 'Help'
             translateLabel: true
             startGroup: right
-            submenu:
+            submenu: 
            (Menu
               (
                (MenuItem
@@ -1509,9 +1511,9 @@
 !BreakpointBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__BreakpointBrowser.st,v 1.14 2009-10-03 10:42:02 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__BreakpointBrowser.st,v 1.15 2009-10-22 13:58:02 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__BreakpointBrowser.st,v 1.14 2009-10-03 10:42:02 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__BreakpointBrowser.st,v 1.15 2009-10-22 13:58:02 cg Exp $'
 ! !