Function: internal-complete-buffer-except

internal-complete-buffer-except is a byte-compiled function defined in minibuffer.el.gz.

Signature

(internal-complete-buffer-except &optional BUFFER)

Documentation

Perform completion on all buffers excluding BUFFER.

BUFFER nil or omitted means use the current buffer. Like internal-complete-buffer, but removes BUFFER from the completion list.

Source Code

;; Defined in /usr/src/emacs/lisp/minibuffer.el.gz
(defun internal-complete-buffer-except (&optional buffer)
  "Perform completion on all buffers excluding BUFFER.
BUFFER nil or omitted means use the current buffer.
Like `internal-complete-buffer', but removes BUFFER from the completion list."
  (let ((except (if (stringp buffer) buffer (buffer-name buffer))))
    (apply-partially #'completion-table-with-predicate
		     #'internal-complete-buffer
		     (lambda (name)
		       (not (equal (if (consp name) (car name) name) except)))
		     nil)))