Function: help--symbol-completion-table-affixation
help--symbol-completion-table-affixation is a byte-compiled function
defined in help-fns.el.gz.
Signature
(help--symbol-completion-table-affixation COMPLETIONS)
Source Code
;; Defined in /usr/src/emacs/lisp/help-fns.el.gz
(defun help--symbol-completion-table-affixation (completions)
(mapcar (lambda (c)
(let* ((s (intern c))
(doc (condition-case nil (documentation s) (error nil)))
(doc (and doc (substring doc 0 (string-search "\n" doc)))))
(list c (propertize
(format "%-4s" (help--symbol-class s))
'face 'completions-annotations)
(if doc (propertize (format " -- %s" doc)
'face 'completions-annotations)
""))))
completions))