Tools__BreakpointService.st
changeset 17620 b7346dd44eb5
parent 17500 7f309137beb8
child 17777 3a3e57e36d2c
--- a/Tools__BreakpointService.st	Sat Aug 12 13:22:07 2017 +0200
+++ b/Tools__BreakpointService.st	Wed Aug 16 08:32:59 2017 +0200
@@ -90,7 +90,7 @@
 
     |pos|
 
-    breakpoints isNil ifTrue:[^ nil].
+    breakpoints isEmptyOrNil ifTrue:[^ nil].
 
     pos := textView characterPositionOfLine:line col:1.
     ^ breakpoints 
@@ -102,7 +102,7 @@
         ]
 
     "Modified: / 17-06-2011 / 13:59:17 / Jan Vrany <jan.vrany@fit.cvut.cz>"
-    "Modified (format): / 05-07-2011 / 21:33:23 / cg"
+    "Modified: / 16-08-2017 / 08:29:51 / cg"
 !
 
 breakpoints
@@ -272,7 +272,7 @@
         currentMethodClass := nil
     ].
     breakpoints := methodsBreakPoints.
-    breakpoints notNil ifTrue:[ 
+    breakpoints notEmptyOrNil ifTrue:[ 
         "/ Nil out breakpoint's position. It's invalid as soon as
         "/ user edits the code. Instead, depend on line information.
         "/ Breakpoint character positions are fixed up just before
@@ -285,6 +285,7 @@
     "Created: / 06-07-2011 / 15:24:09 / cg"
     "Modified: / 06-07-2011 / 17:32:54 / jv"
     "Modified: / 23-02-2015 / 14:48:03 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 16-08-2017 / 08:31:18 / cg"
 !
 
 updateCurrentMethod