Function: erc-capab-identify-add-prefix

erc-capab-identify-add-prefix is a byte-compiled function defined in erc-capab.el.gz.

Signature

(erc-capab-identify-add-prefix)

Documentation

Add erc-capab-identify-prefix to nickname if user is unidentified.

Source Code

;; Defined in /usr/src/emacs/lisp/erc/erc-capab.el.gz
(defun erc-capab-identify-add-prefix ()
  "Add `erc-capab-identify-prefix' to nickname if user is unidentified."
  (when (and erc-capab-identify-prefix
             (erc-with-server-buffer erc-capab-identify-activated))
    (goto-char (or (erc-find-parsed-property) (point-min)))
    (let ((nickname (erc-capab-identify-get-unidentified-nickname
                     (erc-get-parsed-vector (point)))))
      (when (and nickname
                 (goto-char (point-min))
                 ;; assuming the first use of `nickname' is the sender's nick
                 (re-search-forward (regexp-quote nickname) nil t))
        (goto-char (match-beginning 0))
        (insert (propertize erc-capab-identify-prefix
                            'font-lock-face
                            'erc-capab-identify-unidentified))))))