retrieve function documentation correctly

This commit is contained in:
Noam Postavsky 2013-11-27 21:04:26 -05:00
parent fd3fa39444
commit 8d7c9a63a2

View File

@ -49,7 +49,7 @@
(body (or (cond ((boundp symbol)
(documentation-property symbol 'variable-documentation t))
((fboundp symbol)
(documentation-property symbol 'function-documentation t))
(documentation symbol t))
(t
(format "*WARNING*: no symbol named =%s=" symbol)))
(format "*WARNING*: no doc for symbol =%s=" symbol)))