Fix `values` threading shit
| author |
Steve Losh <steve@stevelosh.com> |
| date |
Wed, 04 Apr 2018 22:11:33 -0400 |
| parents |
595e16056317
|
| children |
19aeb5ea3df9
|
| branches/tags |
(none) |
| files |
src/looms/004-turtle-curves.lisp |
Changes
--- a/src/looms/004-turtle-curves.lisp Fri Mar 23 23:36:47 2018 -0400
+++ b/src/looms/004-turtle-curves.lisp Wed Apr 04 22:11:33 2018 -0400
@@ -298,9 +298,7 @@
(axiom (l-system-axiom l-system))
(*angle* (l-system-recommended-angle l-system))))
(multiple-value-bind (productions mutagen)
- (-<> l-system
- l-system-productions
- maybe-mutate-productions))
+ (maybe-mutate-productions (l-system-productions l-system)))
(flax.drawing:with-rendering
(canvas filetype filename width height :background bg :padding 0.05))
(progn