Function: erc-networks--ensure-announced

erc-networks--ensure-announced is a byte-compiled function defined in erc-networks.el.gz.

Signature

(erc-networks--ensure-announced _ PARSED)

Documentation

Set a fallback erc-server-announced-name if still unset.

Copy source (prefix) from MOTD-ish message as a last resort.

Source Code

;; Defined in /usr/src/emacs/lisp/erc/erc-networks.el.gz
;; This lives here in this file because all the other "on connect"
;; MOTD stuff ended up here (but perhaps that needs to change).

(defun erc-networks--ensure-announced (_ parsed)
  "Set a fallback `erc-server-announced-name' if still unset.
Copy source (prefix) from MOTD-ish message as a last resort."
  ;; The 004 handler never ran; see 2004-03-10 Diane Murray in change log
  (unless erc-server-announced-name
    (require 'erc-button)
    (erc-button--display-error-notice-with-keys
     "Failed to determine server name. Using \""
     (setq erc-server-announced-name (erc-response.sender parsed)) "\" instead"
     ". If this was unexpected, consider reporting it via \\[erc-bug]."))
  nil)