Function: abbrev--suggest-shortest-abbrev

abbrev--suggest-shortest-abbrev is a byte-compiled function defined in abbrev.el.gz.

Signature

(abbrev--suggest-shortest-abbrev NEW CURRENT)

Documentation

Return the shortest of the two abbrevs given by NEW and CURRENT.

NEW and CURRENT are cons cells where the car is the expansion and the cdr is the abbrev.

Source Code

;; Defined in /usr/src/emacs/lisp/abbrev.el.gz
(defun abbrev--suggest-shortest-abbrev (new current)
    "Return the shortest of the two abbrevs given by NEW and CURRENT.
NEW and CURRENT are cons cells where the `car' is the expansion
and the `cdr' is the abbrev."
    (if (not current)
	new
      (if (< (length (cdr new))
	     (length (cdr current)))
	  new
	current)))