Function: widget-default-completions

widget-default-completions is a byte-compiled function defined in wid-edit.el.gz.

Signature

(widget-default-completions WIDGET)

Documentation

Return completion data, like completion-at-point-functions would.

Source Code

;; Defined in /usr/src/emacs/lisp/wid-edit.el.gz
(defun widget-default-completions (widget)
  "Return completion data, like `completion-at-point-functions' would."
  (let ((completions (widget-get widget :completions)))
    (cond
     (completions
      (list (widget-field-start widget)
            (max (point) (widget-field-text-end widget))
            completions))
     ((widget-get widget :complete)
      (lambda () (widget-apply widget :complete)))
     ((widget-get widget :complete-function)
      (lambda ()
        (let ((widget--completing-widget widget))
          (call-interactively
           (widget-get widget :complete-function))))))))