Function: completion-locate-entry-retry

completion-locate-entry-retry is a byte-compiled function defined in completion.el.gz.

Signature

(completion-locate-entry-retry OLD-ENTRY)

Aliases

locate-completion-entry-retry (obsolete since 27.1)

Source Code

;; Defined in /usr/src/emacs/lisp/completion.el.gz
(defun completion-locate-entry-retry (old-entry)
  (let ((inside-locate-completion-entry t))
    (add-completion (completion-string old-entry)
		    (completion-num-uses old-entry)
		    (completion-last-use-time old-entry))
    (let* ((cmpl-entry (find-exact-completion (completion-string old-entry)))
	   (pref-entry
	    (if cmpl-entry
		(find-cmpl-prefix-entry
		  (substring cmpl-db-downcase-string
			     0 completion-prefix-min-length)))))
      (if (and cmpl-entry pref-entry)
	  ;; try again
	  (completion-locate-entry cmpl-entry pref-entry)
	  ;; still losing
	  (completion-locate-db-error)))))