diff --git a/src/clj/witan/send/send.clj b/src/clj/witan/send/send.clj index 864a7b8a..1af7dcba 100644 --- a/src/clj/witan/send/send.clj +++ b/src/clj/witan/send/send.clj @@ -363,7 +363,7 @@ (apply merge-with + (mapcat #(map :transitions %) projections))) (defn output-transitions [file projections] - (spit file (pr-str projections))) + (binding [*print-length* nil] (spit file (pr-str projections)))) (defn values-rf "Associate a reducing function to be used for each value of map indexed by key"