Function: erc-dcc-chat-setup

erc-dcc-chat-setup is a byte-compiled function defined in erc-dcc.el.gz.

Signature

(erc-dcc-chat-setup ENTRY)

Documentation

Setup a DCC chat buffer, returning the buffer.

Source Code

;; Defined in /usr/src/emacs/lisp/erc/erc-dcc.el.gz
(defun erc-dcc-chat-setup (entry)
  "Setup a DCC chat buffer, returning the buffer."
  (let* ((nick (erc-extract-nick (plist-get entry :nick)))
         (buffer (generate-new-buffer
                  (format erc-dcc-chat-buffer-name-format nick)))
         (proc (plist-get entry :peer))
         (parent-proc (plist-get entry :parent)))
    (erc-setup-buffer buffer)
    (with-current-buffer buffer
      (erc-dcc-chat-mode)
      (setq erc-server-process parent-proc
            erc-dcc-from nick
            erc-dcc-entry-data entry
            erc-dcc-unprocessed-output ""
            erc-insert-marker (point-max-marker)
            erc-input-marker (make-marker))
      (erc-display-prompt buffer (point-max))
      (set-process-buffer proc buffer)
      (add-hook 'kill-buffer-hook #'erc-dcc-chat-buffer-killed nil t)
      (run-hook-with-args 'erc-dcc-chat-connect-hook proc))
    buffer))