Function: rcirc-cmd-ctcp
rcirc-cmd-ctcp is a byte-compiled function defined in rcirc.el.gz.
Signature
(rcirc-cmd-ctcp ARGS &optional PROCESS TARGET)
Documentation
Handle ARGS as a CTCP command.
PROCESS is the process object for the current connection.
Source Code
;; Defined in /usr/src/emacs/lisp/net/rcirc.el.gz
(defun rcirc-cmd-ctcp (args &optional process _target)
"Handle ARGS as a CTCP command.
PROCESS is the process object for the current connection."
(if (string-match "^\\([^ ]+\\)\\s-+\\(.+\\)$" args)
(let* ((target (match-string 1 args))
(request (upcase (match-string 2 args)))
(function (intern-soft (concat "rcirc-ctcp-sender-" request))))
(if (fboundp function) ;; use special function if available
(funcall function process target request)
(rcirc-send-ctcp process target request)))
(rcirc-print process (rcirc-nick process) "ERROR" nil
"usage: /ctcp NICK REQUEST")))