Function: iswitchb-set-common-completion

iswitchb-set-common-completion is a byte-compiled function defined in iswitchb.el.gz.

Signature

(iswitchb-set-common-completion)

Documentation

Find common completion of iswitchb-text in iswitchb-matches.

The result is stored in iswitchb-common-match-string.

Source Code

;; Defined in /usr/src/emacs/lisp/obsolete/iswitchb.el.gz
;;; COMPLETION CODE

(defun iswitchb-set-common-completion  ()
  "Find common completion of `iswitchb-text' in `iswitchb-matches'.
The result is stored in `iswitchb-common-match-string'."

  (let (val)
    (setq  iswitchb-common-match-string nil)
    (if (and iswitchb-matches
	     (not iswitchb-regexp) ;; testing
             (stringp iswitchb-text)
             (> (length iswitchb-text) 0))
        (if (setq val (iswitchb-find-common-substring
                       iswitchb-matches iswitchb-text))
            (setq iswitchb-common-match-string val)))
    val))