[types] bugfix cog polygon generator

thi-ng · Apr 27, 2015 · d3d12b6 · d3d12b6
1 parent 9b538ed
commit d3d12b6
Showing 1 changed file with 1 addition and 2 deletions.
diff --git a/geom-types/src/polygon.org b/geom-types/src/polygon.org
@@ -47,8 +47,7 @@
     [radius teeth profile]
     (-> (thi.ng.geom.types.Circle2. (vec2) radius)
         (g/vertices (* teeth (count profile)))
-        (->> (cycle profile)
-             (mapv (fn [p v] (g/* v p)))
+        (->> (mapv (fn [p v] (g/* v p)) (cycle profile))
              (thi.ng.geom.types.Polygon2.))))
 #+END_SRC