--- a/DebugView.st Sun Jul 28 12:10:00 2013 +0200
+++ b/DebugView.st Sun Jul 28 13:52:27 2013 +0200
@@ -704,6 +704,18 @@
#(Menu
(
(MenuItem
+ enabled: canRemoveBreakpoint
+ label: 'Remove Breakpoint'
+ itemValue: removeBreakpoint
+ )
+ (MenuItem
+ label: 'Remove all Breakpoints'
+ itemValue: removeAllBreakpoints
+ )
+ (MenuItem
+ label: '-'
+ )
+ (MenuItem
label: 'Ignore this Halt/BreakPoint'
submenu:
(Menu
@@ -805,18 +817,6 @@
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
@@ -837,8 +837,6 @@
nil
nil
)
-
- "Modified: / 28-07-2013 / 10:24:21 / cg"
!
classMenuSpec
@@ -8566,15 +8564,15 @@
!DebugView class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/DebugView.st,v 1.605 2013-07-28 10:10:00 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/DebugView.st,v 1.606 2013-07-28 11:52:27 cg Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libtool/DebugView.st,v 1.605 2013-07-28 10:10:00 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/DebugView.st,v 1.606 2013-07-28 11:52:27 cg Exp $'
!
version_SVN
- ^ '$Id: DebugView.st,v 1.605 2013-07-28 10:10:00 cg Exp $'
+ ^ '$Id: DebugView.st,v 1.606 2013-07-28 11:52:27 cg Exp $'
! !