Fixed misc rules

This commit is contained in:
Jonas Enlund 2012-03-07 21:27:55 +02:00
parent 0c0ad1ec31
commit bebabfd493

View file

@ -1,8 +1,8 @@
(ns jonase.kibit.misc)
(def rules
'{(apply str (interpose ?x ?y)) clojure.string/join
'{(apply str (interpose ?x ?y)) (clojure.string/join ?x ?y)
;; mapcat
(apply concat (apply map ?x ?y)) mapcat
(apply concat (map ?x . ?y)) mapcat})
(apply concat (apply map ?x ?y)) (mapcat ?x ?y)
(apply concat (map ?x . ?y)) (mapcat ?x . ?y)})