equal
deleted
inserted
replaced
232 // don't move new point for more than length of initial segment |
232 // don't move new point for more than length of initial segment |
233 d:= dab; |
233 d:= dab; |
234 if distL > d then distL:= d; |
234 if distL > d then distL:= d; |
235 if distR > d then distR:= d; |
235 if distR > d then distR:= d; |
236 |
236 |
237 if distR + distL < minDistance * 2 then |
237 if distR + distL < minDistance * 2 + 10 then |
238 begin |
238 begin |
239 // limits are too narrow, leave point alone |
239 // limits are too narrow, leave point alone |
240 newPoint:= p1 |
240 newPoint:= p1 |
241 end |
241 end |
242 else |
242 else |