Function: completion--metadata
completion--metadata is a byte-compiled function defined in
minibuffer.el.gz.
Signature
(completion--metadata STRING BASE MD-AT-POINT TABLE PRED)
Source Code
;; Defined in /usr/src/emacs/lisp/minibuffer.el.gz
(defun completion--metadata (string base md-at-point table pred)
;; Like completion-metadata, but for the specific case of getting the
;; metadata at `base', which tends to trigger pathological behavior for old
;; completion tables which don't understand `metadata'.
(let ((bounds (completion-boundaries string table pred "")))
(if (eq (car bounds) base) md-at-point
(completion-metadata (substring string 0 base) table pred))))