fix :uneval node's replace-children fn. (fixes #23)

Yannick Scherer · Yannick Scherer · commit 0dacbfc4a2bb · 2015-01-31T12:43:00.000+01:00
diff --git a/src/rewrite_clj/node/uneval.clj b/src/rewrite_clj/node/uneval.clj
@@ -19,7 +19,7 @@
   (children [_] children)
   (replace-children [this children']
     (node/assert-single-sexpr children')
-    (assoc this :children (first children')))
+    (assoc this :children children'))
 
   Object
   (toString [this]
