File tree Expand file tree Collapse file tree 3 files changed +11
-11
lines changed Expand file tree Collapse file tree 3 files changed +11
-11
lines changed Original file line number Diff line number Diff line change 7474 " If the var `v` has a see-also has associated with it, assoc that into meta-map."
7575 [v meta-map]
7676 (if-let [see-also (:see-alsos (cljdocs/get-doc (var-name v)))]
77- (merge meta-map {:see-also see-also})
77+ (merge meta-map {:see-also ( map symbol see-also) })
7878 meta-map))
7979
8080(defn- maybe-protocol
Original file line number Diff line number Diff line change 390390; ;;;;;;;;;;;;;;;;;
391391
392392(deftest see-also-test
393- (let [expected [ : clojure.core/map-indexed
394- : clojure.core/pmap
395- : clojure.core/amap
396- : clojure.core/mapcat
397- : clojure.core/keep
398- : clojure.core/juxt
399- : clojure.core/mapv
400- : clojure.core/reduce
401- : clojure.core/run!] ]
393+ (let [expected '( clojure.core/map-indexed
394+ clojure.core/pmap
395+ clojure.core/amap
396+ clojure.core/mapcat
397+ clojure.core/keep
398+ clojure.core/juxt
399+ clojure.core/mapv
400+ clojure.core/reduce
401+ clojure.core/run!) ]
402402
403403 (testing " info/see-also through info/info* in a required namespace"
404404 (is (= expected (-> '{:ns orchard.test-ns :sym map}
Original file line number Diff line number Diff line change 1717 (set (map the-ns subset))
1818 (set (namespaces ns-query)))
1919 {:has-tests? true } #{'orchard.namespace-test}
20- {:project? true } #{'orchard.core 'orchard. meta 'orchard.namespace-test}
20+ {:project? true } #{'orchard.meta 'orchard.namespace-test}
2121 {:project? true
2222 :has-tests? true } #{'orchard.namespace-test 'orchard.query-test}
2323 {:include-regexps [#"query" ]} #{'orchard.query 'orchard.query-test}
You can’t perform that action at this time.
0 commit comments