Function: ediff-unique-buffer-name

ediff-unique-buffer-name is a byte-compiled function defined in ediff-util.el.gz.

Signature

(ediff-unique-buffer-name PREFIX SUFFIX)

Source Code

;; Defined in /usr/src/emacs/lisp/vc/ediff-util.el.gz
;; Construct a unique buffer name.
;; The first one tried is prefixsuffix, then prefix<2>suffix,
;; prefix<3>suffix, etc.
(defun ediff-unique-buffer-name (prefix suffix)
  (if (null (get-buffer (concat prefix suffix)))
      (concat prefix suffix)
    (let ((n 2))
      (while (get-buffer (format "%s<%d>%s" prefix n suffix))
	(setq n (1+ n)))
      (format "%s<%d>%s" prefix n suffix))))