(defn help-summary-for [task-ns] (require task-ns) (let [task-name (last (.split (name task-ns) "\\."))] (str task-name (apply str (repeat (- 8 (count task-name)) " ")) " - " (:doc (meta (find-ns task-ns))))))
Comments top
No comments for help-summary-for. Log in to add a comment.