>>113
I like the idea, but playing around with this:
(defvar *function-symbols*
(let (fns)
(mapatoms (lambda (a)
(when (and (functionp a)
(documentation a))
(push a fns))))
fns))
(documentation
(nth (random (length *function-symbols*))
*function-symbols*))
it seems most docstrings are rather boring :/