Function: erc-xdcc-send

erc-xdcc-send is a byte-compiled function defined in erc-xdcc.el.gz.

Signature

(erc-xdcc-send PROC NICK LOGIN HOST ARGS)

Documentation

Send a file to NICK.

Source Code

;; Defined in /usr/src/emacs/lisp/erc/erc-xdcc.el.gz
(defun erc-xdcc-send (proc nick _login _host args)
  "Send a file to NICK."
  (let ((n (string-to-number (car args)))
	(len (length erc-xdcc-files)))
    (cond
     ((= len 0)
      (erc-xdcc-reply proc nick "No files offered, sorry"))
     ((or (< n 1) (> n len))
      (erc-xdcc-reply proc nick (format "%d out of range" n)))
     (t (erc-dcc-send-file nick (nth (1- n) erc-xdcc-files) proc)))))