DebugView.st
changeset 1764 e7aa6f50e766
parent 1762 cd2bec8238fa
child 1765 a704122c92dc
--- a/DebugView.st	Wed Jul 29 19:01:02 1998 +0200
+++ b/DebugView.st	Wed Jul 29 19:04:07 1998 +0200
@@ -1844,7 +1844,8 @@
         (left not 
         and:[skipLineNr notNil 
         and:[where notNil
-        and:[where lineNumber < skipLineNr]]]) ifTrue:[
+        and:[where lineNumber notNil
+        and:[where lineNumber < skipLineNr]]]]) ifTrue:[
             DebuggingDebugger == true ifTrue:[
                 'skip (' print. skipLineNr print. ' unreached - ignored' printNL.
             ].
@@ -1904,7 +1905,7 @@
     self enter:(thisContext sender sender) select:initiallyShown
 
     "Created: / 14.10.1996 / 12:53:39 / cg"
-    "Modified: / 3.4.1998 / 21:09:16 / cg"
+    "Modified: / 29.7.1998 / 16:33:42 / cg"
 ! !
 
 !DebugView methodsFor:'menu / button actions'!
@@ -3788,6 +3789,6 @@
 !DebugView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/DebugView.st,v 1.210 1998-07-29 13:11:41 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/DebugView.st,v 1.211 1998-07-29 17:04:07 cg Exp $'
 ! !
 DebugView initialize!