Function: erc-coding-system-for-target

erc-coding-system-for-target is a byte-compiled function defined in erc-backend.el.gz.

Signature

(erc-coding-system-for-target TARGET)

Documentation

Return the coding system or cons cell appropriate for TARGET.

This is determined via erc-encoding-coding-alist or erc-server-coding-system.

Source Code

;; Defined in /usr/src/emacs/lisp/erc/erc-backend.el.gz
;;;; Sending messages

(defun erc-coding-system-for-target (target)
  "Return the coding system or cons cell appropriate for TARGET.
This is determined via `erc-encoding-coding-alist' or
`erc-server-coding-system'."
  (unless target (setq target (erc-default-target)))
  (or (when target
        (let ((case-fold-search t))
          (catch 'match
            (dolist (pat erc-encoding-coding-alist)
              (when (string-match (car pat) target)
                (throw 'match (cdr pat)))))))
      (and (functionp erc-server-coding-system)
           (funcall erc-server-coding-system target))
      erc-server-coding-system))