--- a/DebugView.st	Tue Nov 20 23:43:55 2001 +0100
+++ b/DebugView.st	Wed Nov 21 00:04:34 2001 +0100
@@ -1259,7 +1259,6 @@
         self destroy
     ].
 
-'1' printCR.
     "/ release all context stuff.
     "/ This is required to avoid keeping references to the debuggees objects
     "/ forever. (since the debugger is reused for faster startup next time)
@@ -1454,7 +1453,6 @@
 exit_restart
     |con|
 
-'2' printCR.
     selectedContext notNil ifTrue:[
         con := selectedContext.
         self cacheMyself.
@@ -3242,7 +3240,6 @@
      at save places (for example: in the event loop) and returns back
      from whatever the process is doing, but does not terminate it."
 
-'doAbort' printCR.
     self checkIfCodeIsReallyModified ifTrue:[
         (self confirm:('Code modified - abort anyway ?'))
         ifFalse:[
@@ -4419,7 +4416,6 @@
 !
 
 showError:message
-'errmsg' printCR.
     codeView contents:(resources string:message).
     shown ifTrue:[
         exclusive ifTrue:[
@@ -4889,7 +4885,6 @@
                 (signal isControlInterrupt) ifTrue:[
                     ignoreBreakpoints == true ifTrue:[
                         'DebugView [info]: halt/break in debugger ignored 1' infoPrintCR.
-signal printCR.
                         ex proceed
                     ].
                 ].
@@ -5185,7 +5180,6 @@
                 con := con sender.
             ]
         ].
-'FF' printCR.
         codeView contents:(s contents).
         ex return.
     ] do:[
@@ -5225,7 +5219,6 @@
                 ]
             ].
             con isNil ifTrue:[
-'AA' printCR.
                 codeView contents:nil.
                 ^ self
             ].
@@ -5401,7 +5394,6 @@
                     ].
                     code isNil ifTrue:[
                         method sourceFilename notNil ifTrue:[
-'BB' printCR.
                             codeView contents:(resources 
                                                        string:'** no sourcefile: %1 **'
                                                        with:method sourceFilename).
@@ -5428,7 +5420,6 @@
             code isNil ifTrue:[
                 "/ canAccept := false.
                 codeSet ifFalse:[
-'CC' printCR.
                     codeView contents:nil.
                 ]
             ] ifFalse:[
@@ -5466,7 +5457,6 @@
                         "/ means: do not really know in interpreted methods
                         codeView selectFromLine:255 col:1 toLine:codeView list size + 1 col:0.
                     ] ifFalse:[
-'30 ' print. lineNrInMethod printCR.
                         codeView selectLine:lineNrInMethod.
                     ].
                     codeView makeSelectionVisible
@@ -5595,6 +5585,6 @@
 !DebugView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/DebugView.st,v 1.302 2001-11-20 22:43:55 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/DebugView.st,v 1.303 2001-11-20 23:04:34 cg Exp $'
 ! !
 DebugView initialize!