Function: erc-ctcp-query-FINGER

erc-ctcp-query-FINGER is a byte-compiled function defined in erc.el.gz.

Signature

(erc-ctcp-query-FINGER PROC NICK LOGIN HOST TO MSG)

Documentation

Respond to a CTCP FINGER query.

Source Code

;; Defined in /usr/src/emacs/lisp/erc/erc.el.gz
(defun erc-ctcp-query-FINGER (_proc nick _login _host _to _msg)
  "Respond to a CTCP FINGER query."
  (unless erc-disable-ctcp-replies
    (let ((s (if erc-anonymous-login
                 (format "FINGER I'm %s." (erc-current-nick))
               (format "FINGER %s (%s@%s)."
                       (user-full-name)
                       (user-login-name)
                       (system-name))))
          (ns (erc-time-diff erc-server-last-sent-time nil)))
      (when (> ns 0)
        (setq s (concat s " Idle for " (erc-sec-to-time ns))))
      (erc-send-ctcp-notice nick s)))
  nil)