Function: eudc-variable-protocol-value

eudc-variable-protocol-value is a byte-compiled function defined in eudc.el.gz.

Signature

(eudc-variable-protocol-value VAR &optional PROTOCOL)

Documentation

Return the value of VAR local to PROTOCOL.

Return unbound if VAR has no value local to PROTOCOL. PROTOCOL defaults to eudc-protocol.

Source Code

;; Defined in /usr/src/emacs/lisp/net/eudc.el.gz
(defun eudc-variable-protocol-value (var &optional protocol)
  "Return the value of VAR local to PROTOCOL.
Return `unbound' if VAR has no value local to PROTOCOL.
PROTOCOL defaults to `eudc-protocol'."
  (let* ((eudc-locals (get var 'eudc-locals))
	 protocol-locals)
    (if (not (and  (boundp var)
		   eudc-locals
		   (eudc-plist-member eudc-locals 'protocol)))
	'unbound
      (setq protocol-locals (eudc-plist-get eudc-locals 'protocol))
      (eudc-lax-plist-get protocol-locals
			  (or protocol
			      eudc-protocol) 'unbound))))