DebugView.st
changeset 9613 380816519281
parent 9612 28363bf9877d
child 9618 8b002e0ce978
--- a/DebugView.st	Wed Oct 27 13:17:37 2010 +0200
+++ b/DebugView.st	Wed Oct 27 13:33:50 2010 +0200
@@ -4478,7 +4478,7 @@
     [
         answer := Dialog 
                     request:(resources string:'How long should this halt/breakpoint be ignored (s/m/h) ?')
-                    initialAnswer:(LastIgnoreHaltDuration ? '') printString.
+                    initialAnswer:(LastIgnoreHaltDuration ? '30s') printString.
         answer isEmptyOrNil ifTrue:[^ self].
 
         dT := TimeDuration readFrom:answer onError:[ nil ].
@@ -4488,6 +4488,8 @@
             ^ self.
         ].
     ] loop
+
+    "Modified: / 27-10-2010 / 13:33:42 / cg"
 !
 
 openSettingsDialog
@@ -7056,11 +7058,11 @@
 !DebugView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/DebugView.st,v 1.510 2010-10-27 11:17:37 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/DebugView.st,v 1.511 2010-10-27 11:33:50 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/DebugView.st,v 1.510 2010-10-27 11:17:37 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/DebugView.st,v 1.511 2010-10-27 11:33:50 cg Exp $'
 ! !
 
 DebugView initialize!