We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
1 parent c15f751 commit 8bfd760Copy full SHA for 8bfd760
1 file changed
test/java_time/dev/gen.clj
@@ -184,10 +184,12 @@
184
(list '.join 'java-time.impl.load/serialized-load-thread))))])))
185
186
(defn print-form [form]
187
- (binding [*print-namespace-maps* false
188
- *print-meta* true
189
- *print-length* nil
190
- *print-level* nil]
+ (with-bindings
+ (cond-> {#'*print-meta* true
+ #'*print-length* nil
+ #'*print-level* nil}
191
+ (resolve '*print-namespace-maps*)
192
+ (assoc (resolve '*print-namespace-maps*) false))
193
(cond
194
(string? form) (println form)
195
:else (println (pr-str (walk/postwalk
0 commit comments