diff --git a/frontend/src/uxbox/main/snap.cljs b/frontend/src/uxbox/main/snap.cljs index 5ede74426e..e42d46a86a 100644 --- a/frontend/src/uxbox/main/snap.cljs +++ b/frontend/src/uxbox/main/snap.cljs @@ -21,7 +21,7 @@ [uxbox.util.geom.snap-points :as sp])) (def ^:private snap-accuracy 5) -(def ^:private snap-distance-accuracy 5) +(def ^:private snap-distance-accuracy 10) (defn- remove-from-snap-points [remove-id?] (fn [query-result] @@ -145,9 +145,7 @@ (filter #(<= (mth/abs %) snap-distance-accuracy)) (reduce min ##Inf))] - (if (mth/finite? min-snap) [0 min-snap] nil)) - - ))))) + (if (mth/finite? min-snap) [0 min-snap] nil))))))) (defn select-shapes-area [page-id shapes objects area-selrect] (->> (uw/ask! {:cmd :selection/query diff --git a/frontend/src/uxbox/main/ui/workspace/snap_distances.cljs b/frontend/src/uxbox/main/ui/workspace/snap_distances.cljs index 98c56c8ad5..8dfe91f09b 100644 --- a/frontend/src/uxbox/main/ui/workspace/snap_distances.cljs +++ b/frontend/src/uxbox/main/ui/workspace/snap_distances.cljs @@ -110,7 +110,7 @@ pair->distance+pair (fn [[sh1 sh2]] - [(-> (gsh/distance-shapes sh1 sh2) coord mth/round) [sh1 sh2]]) + [(-> (gsh/distance-shapes sh1 sh2) coord (mth/precision 2)) [sh1 sh2]]) contains-selected? (fn [selected pairs]