Function: apropos-documentation-internal

apropos-documentation-internal is a byte-compiled function defined in apropos.el.gz.

Signature

(apropos-documentation-internal DOC)

Source Code

;; Defined in /usr/src/emacs/lisp/apropos.el.gz
(defun apropos-documentation-internal (doc)
  (cond
   ((consp doc)
    (apropos-documentation-check-elc-file (car doc)))
   ((and doc
         ;; Sanity check in case bad data sneaked into the
         ;; documentation slot.
         (stringp doc)
         (string-match apropos-all-words-regexp doc)
         (apropos-true-hit-doc doc))
    (when apropos-match-face
      (setq doc (substitute-command-keys (copy-sequence doc)))
      (if (or (string-match apropos-pattern-quoted doc)
              (string-match apropos-all-words-regexp doc))
          (put-text-property (match-beginning 0)
                             (match-end 0)
                             'face apropos-match-face doc))
      doc))))