--- a/DebugView.st	Mon Jul 30 16:18:52 2001 +0200
+++ b/DebugView.st	Wed Aug 01 11:57:42 2001 +0200
@@ -2127,10 +2127,13 @@
                 steppedContext := actualContext := here.
                 steppedContextLineno := here lineNumber.
             ] ifFalse:[    
-                DebuggingDebugger == true ifTrue:[
-                    'same line - ignored' printCR.
+                "/ kludge - I only have the info for up to 255 lines
+                steppedContextLineno ~~ 255 ifTrue:[
+                    DebuggingDebugger == true ifTrue:[
+                        'same line - ignored' printCR.
+                    ].
+                    ignore := true
                 ].
-                ignore := true
             ].
         ].
 
@@ -4372,6 +4375,6 @@
 !DebugView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/DebugView.st,v 1.274 2001-07-28 12:22:20 martin Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/DebugView.st,v 1.275 2001-08-01 09:57:42 cg Exp $'
 ! !
 DebugView initialize!