Function: org-capture-get-indirect-buffer

org-capture-get-indirect-buffer is a byte-compiled function defined in org-capture.el.gz.

Signature

(org-capture-get-indirect-buffer &optional BUFFER PREFIX)

Documentation

Make an indirect BUFFER for a capture process.

Use PREFIX as a prefix for the name of the indirect buffer.

Source Code

;; Defined in /usr/src/emacs/lisp/org/org-capture.el.gz
(defun org-capture-get-indirect-buffer (&optional buffer prefix)
  "Make an indirect BUFFER for a capture process.
Use PREFIX as a prefix for the name of the indirect buffer."
  (setq buffer (or buffer (current-buffer)))
  (let ((n 1) (base (buffer-name buffer)) bname)
    (setq bname (concat prefix "-" base))
    (while (buffer-live-p (get-buffer bname))
      (setq bname (concat prefix "-" (number-to-string (cl-incf n)) "-" base)))
    (condition-case nil
        (make-indirect-buffer buffer bname 'clone)
      (error
       (let ((buf (make-indirect-buffer buffer bname)))
	 (with-current-buffer buf (org-mode))
	 buf)))))