*** empty log message ***
authorClaus Gittinger <cg@exept.de>
Tue, 28 Oct 2003 00:00:49 +0100
changeset 7706 69afbbcd7033
parent 7705 76a504c1e6a8
child 7707 25f9cb27cbf3
*** empty log message ***
MiniDebugger.st
--- a/MiniDebugger.st	Mon Oct 27 23:59:14 2003 +0100
+++ b/MiniDebugger.st	Tue Oct 28 00:00:49 2003 +0100
@@ -623,13 +623,13 @@
     ].
 
     (prompt 
-	? (nesting == 0 ifTrue:[ 
-	    'MiniDebugger> ' 
-	  ] ifFalse:[ 
-	    'MiniDebugger' , nesting printString , '>'
-	  ])) print.
+        ? (nesting == 0 ifTrue:[ 
+            'MiniDebugger> ' 
+          ] ifFalse:[ 
+            'MiniDebugger' , nesting printString , '>'
+          ])) print.
 
-    UserInterruptSignal handle:[:ex |
+    UserInterrupt handle:[:ex |
         ex restart
     ] do:[
         |c cmd arg cnt|
@@ -786,5 +786,5 @@
 !MiniDebugger class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/MiniDebugger.st,v 1.61 2003-10-27 22:59:14 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/MiniDebugger.st,v 1.62 2003-10-27 23:00:49 cg Exp $'
 ! !