class: DebugView
authorClaus Gittinger <cg@exept.de>
Sun, 28 Jul 2013 12:10:00 +0200
changeset 13228 4aa6411bdea8
parent 13227 f5d9f0250011
child 13229 515a080489a6
class: DebugView changed: #breakPointMenuSpec reorganized breakpoint menu: most often used items at the top
DebugView.st
--- a/DebugView.st	Sun Jul 28 03:25:28 2013 +0000
+++ b/DebugView.st	Sun Jul 28 12:10:00 2013 +0200
@@ -704,26 +704,6 @@
      #(Menu
         (
          (MenuItem
-            enabled: canRemoveBreakpoint
-            label: 'Remove Breakpoint'
-            itemValue: removeBreakpoint
-          )
-         (MenuItem
-            label: 'Remove all Breakpoints'
-            itemValue: removeAllBreakpoints
-          )
-         (MenuItem
-            label: '-'
-          )
-         (MenuItem
-            enabled: canAddBreakpoint
-            label: 'Add Breakpoint'
-            itemValue: addBreakpoint
-          )
-         (MenuItem
-            label: '-'
-          )
-         (MenuItem
             label: 'Ignore this Halt/BreakPoint'
             submenu: 
            (Menu
@@ -825,10 +805,30 @@
             label: '-'
           )
          (MenuItem
+            enabled: canRemoveBreakpoint
+            label: 'Remove Breakpoint'
+            itemValue: removeBreakpoint
+          )
+         (MenuItem
+            label: 'Remove all Breakpoints'
+            itemValue: removeAllBreakpoints
+          )
+         (MenuItem
+            label: '-'
+          )
+         (MenuItem
+            enabled: canAddBreakpoint
+            label: 'Add Breakpoint'
+            itemValue: addBreakpoint
+          )
+         (MenuItem
             label: 'Manage Breakpoints'
             itemValue: openBreakPointBrowser
           )
          (MenuItem
+            label: '-'
+          )
+         (MenuItem
             label: 'Allow Halt in Debugger'
             itemValue: allowBreakPointsInDebugger:
             indication: allowBreakPointsInDebugger
@@ -837,6 +837,8 @@
         nil
         nil
       )
+
+    "Modified: / 28-07-2013 / 10:24:21 / cg"
 !
 
 classMenuSpec
@@ -8564,15 +8566,15 @@
 !DebugView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/DebugView.st,v 1.604 2013-07-27 13:56:57 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/DebugView.st,v 1.605 2013-07-28 10:10:00 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/DebugView.st,v 1.604 2013-07-27 13:56:57 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/DebugView.st,v 1.605 2013-07-28 10:10:00 cg Exp $'
 !
 
 version_SVN
-    ^ '$Id: DebugView.st,v 1.604 2013-07-27 13:56:57 cg Exp $'
+    ^ '$Id: DebugView.st,v 1.605 2013-07-28 10:10:00 cg Exp $'
 ! !