Function: accept-completion

accept-completion is a byte-compiled function defined in completion.el.gz.

Signature

(accept-completion)

Documentation

Accept the pending completion in completion-to-accept.

This bumps num-uses. Called by add-completion-to-head and completion-search-reset.

Source Code

;; Defined in /usr/src/emacs/lisp/completion.el.gz
(defun accept-completion ()
  "Accept the pending completion in `completion-to-accept'.
This bumps num-uses.  Called by `add-completion-to-head' and
`completion-search-reset'."
  (let ((string completion-to-accept)
	;; if this is added afresh here, then it must be a cdabbrev
	(current-completion-source cmpl-source-cdabbrev)
	entry)
    (setq completion-to-accept nil)
    (setq entry (add-completion-to-head string))
    (set-completion-num-uses entry (1+ (completion-num-uses entry)))
    (setq cmpl-completions-accepted-p t)))