Function: erc-get

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

This function is obsolete since 30.1; temporarily deprecated for later repurposing

Signature

(erc-get &rest UNKNOWN)

Documentation

Retrieve configuration values from erc-settings.

WARNING: this function is a non-functioning remnant from a long-abandoned experiment. ERC may redefine it using the same name for any purpose at any time.

Source Code

;; Defined in /usr/src/emacs/lisp/erc/erc-networks.el.gz
(defun erc-get (var &optional net target)
  "Retrieve configuration values from `erc-settings'.

WARNING: this function is a non-functioning remnant from a
long-abandoned experiment.  ERC may redefine it using the same
name for any purpose at any time.

\(fn &rest UNKNOWN)"
  (declare (obsolete "temporarily deprecated for later repurposing" "30.1"))
  (let ((items erc-settings)
	elt val)
    (while items
      (setq elt (car items)
	    items (cdr items))
      (when (eq (car elt) var)
	(cond ((and net target (listp (nth 1 elt))
		    (eq net (car (nth 1 elt)))
		    (string-equal target (nth 1 (nth 1 elt))))
	       (setq val (nth 2 elt)
		     items nil))
	      ((and net (eq net (nth 1 elt)))
	       (setq val (nth 2 elt)
		     items nil))
	      ((and (not net) (not target) (not (nth 1 elt)))
	       (setq val (nth 2 elt)
		     items nil)))))
    val))