Function: ad-docstring

ad-docstring is a byte-compiled function defined in advice.el.gz.

Signature

(ad-docstring DEFINITION)

Documentation

Return the unexpanded docstring of DEFINITION.

Source Code

;; Defined in /usr/src/emacs/lisp/emacs-lisp/advice.el.gz
(defun ad-docstring (definition)
  "Return the unexpanded docstring of DEFINITION."
  (let ((docstring
	 (if (ad-compiled-p definition)
	     (documentation definition t)
	   (car (cdr (cdr (ad-lambda-expression definition)))))))
    (if (or (stringp docstring)
	    (natnump docstring))
	docstring)))