diff --git a/common/src/app/common/types/path/segment.cljc b/common/src/app/common/types/path/segment.cljc index 9eb36d7a12..bcbbe8eeda 100644 --- a/common/src/app/common/types/path/segment.cljc +++ b/common/src/app/common/types/path/segment.cljc @@ -62,7 +62,7 @@ (map (fn [[index _]] index)))) (defn handler-indices - "Return an index where the key is the positions and the values the handlers" + "Returns [[index prefix] ...] of all handlers associated with point." [content point] (->> (d/with-prev content) (d/enumerate) @@ -76,7 +76,7 @@ []))))) (defn opposite-index - "Calculates the opposite index given a prefix and an index" + "Calculates the opposite handler index given a content, index and prefix." [content index prefix] (let [point (if (= prefix :c2) diff --git a/common/src/app/common/types/path/shape_to_path.cljc b/common/src/app/common/types/path/shape_to_path.cljc index 8641ee556e..cc0f0c9060 100644 --- a/common/src/app/common/types/path/shape_to_path.cljc +++ b/common/src/app/common/types/path/shape_to_path.cljc @@ -32,7 +32,7 @@ (d/without-keys shape dissoc-attrs)) (defn- make-corner-arc - "Creates a curvle corner for border radius" + "Creates a curve corner for border radius" [from to corner radius] (let [x (case corner :top-left (:x from)