Function: mpc-proc-buffer

mpc-proc-buffer is a byte-compiled function defined in mpc.el.gz.

Signature

(mpc-proc-buffer PROC USE &optional BUFFER)

Source Code

;; Defined in /usr/src/emacs/lisp/mpc.el.gz
(defun mpc-proc-buffer (proc use &optional buffer)
  (let* ((bufs (process-get proc 'buffers))
         (buf (cdr (assoc use bufs))))
    (cond
     ((and buffer (buffer-live-p buf) (not (eq buffer buf)))
      (error "Duplicate MPC buffer for %s" use))
     (buffer
      (if buf
          (setcdr (assoc use bufs) buffer)
        (process-put proc 'buffers (cons (cons use buffer) bufs))))
     (t buf))))