chasing down coordinate problem

2021-12-30 19:45:05 +01:00
parent e46316cff8
commit 17a07bc95a
2 changed files with 31 additions and 7 deletions
--- a/src/Segment.lua
+++ b/src/Segment.lua
@@ -171,14 +171,14 @@ end

 function Segment:joinPerpendicular(s)
    -- changes the self, not the parameter
-    if s.vertical then
+    if s.vertical and self.horizontal then
        local sx = s.firstPointX
        if math.abs(self.firstPointX - sx) < math.abs(self.secondPointX - sx) then
            self.firstPointX = sx
        else
            self.secondPointX = sx
        end
-    else
+    elseif s.horizontal and self.vertical then
        local sy = s.firstPointY
        if math.abs(self.firstPointY - sy) < math.abs(self.secondPointY - sy) then
            self.firstPointY = sy