[core] bugfix transduce call in gu/dist*

thi-ng · Nov 4, 2015 · ff1ec64 · ff1ec64
1 parent 5a0e40a
commit ff1ec64
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/geom-core/src/utils.org b/geom-core/src/utils.org
@@ -74,7 +74,7 @@
     [rf]
     (fn [c points]
       (->> points
-           (transduce (map #(g/dist-squared c %)) rf)
+           (transduce (map #(g/dist-squared c %)) rf 0)
            (Math/sqrt))))
 
   (def min-dist (dist* min))