Lucas Stadler лет назад: 13
Родитель
Сommit
703e959de7
1 измененных файлов с 2 добавлено и 2 удалено
  1. 2 2
      clj/hello-clojure.clj

+ 2 - 2
clj/hello-clojure.clj

163
  ([string]
163
  ([string]
164
   (apropos+ string 'clojure.core))
164
   (apropos+ string 'clojure.core))
165
  ([string namespace]
165
  ([string namespace]
166
   (let [symbols (keys (ns-publics namespace))
167
         docs (map #(-> `#'~% eval meta :doc) symbols)]
166
   (let [symbols (vals (ns-publics namespace))
167
         docs (map #(-> % meta :doc) symbols)]
168
     (filter #(and (not= nil %) (.contains % string)) docs))))
168
     (filter #(and (not= nil %) (.contains % string)) docs))))
169
169
170
(apropos+ "containing" 'clojure.core)
170
(apropos+ "containing" 'clojure.core)