✨ Add minor improvement to points->lines helper

2026-04-26 11:48:28 +00:00 · 2023-08-25 12:27:00 +02:00 · 2023-08-25 12:27:00 +02:00 · a82ee01d99
commit a82ee01d99
parent a9d2cc227b
1 changed files with 4 additions and 6 deletions
--- a/common/src/app/common/geom/shapes/intersect.cljc
+++ b/common/src/app/common/geom/shapes/intersect.cljc
@ -73,12 +73,10 @@
   (points->lines points true))

  ([points closed?]
-   (map vector
-        points
-        (-> (rest points)
-            (vec)
-            (cond-> closed?
-              (conj (first points)))))))
+   (map vector points
+        (cond-> (rest points)
+          (true? closed?)
+          (concat (list (first points)))))))

 (defn intersects-lines?
  "Checks if two sets of lines intersect in any point"