We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
1 parent 3977b13 commit fc5a45bCopy full SHA for fc5a45b
src/main/cljs/cljs/repl.cljs
@@ -49,9 +49,10 @@
49
(when doc
50
(println " " doc))))
51
(when n
52
- (when-let [specs (spec/fn-specs (symbol (str (ns-name n)) (name nm)))]
53
- (println "Spec")
54
- (run! (fn [[role spec]]
55
- (when (and spec (not (= spec ::spec/unknown)))
56
- (println " " (str (name role) ":") (spec/describe spec))))
57
- specs))))))
+ (let [specs (spec/fn-specs (symbol (str (ns-name n)) (name nm)))]
+ (when (some identity (vals specs))
+ (print "Spec")
+ (run! (fn [[role spec]]
+ (when (and spec (not (= spec ::spec/unknown)))
+ (print (str "\n " (name role) ":") (spec/describe spec))))
58
+ specs)))))))
0 commit comments