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)))
    (if completions
        (list (widget-field-start widget)
              (max (point) (widget-field-text-end widget))
              completions)
      (if (widget-get widget :complete)
          (lambda () (widget-apply widget :complete))
        (if (widget-get widget :complete-function)
            (lambda ()
              (let ((widget--completing-widget widget))
                (call-interactively
                 (widget-get widget :complete-function)))))))))