Function: eudc-plist-get

eudc-plist-get is a byte-compiled function defined in eudc.el.gz.

Signature

(eudc-plist-get PLIST PROP &optional DEFAULT)

Documentation

Extract the value of PROP in property list PLIST.

PLIST is a list of the form (PROP1 VALUE1 PROP2 VALUE2...). This function returns the first value corresponding to the given PROP, or DEFAULT if PROP is not one of the properties in the list. The comparison with PROP is done using eq. If PLIST is not a valid property list, this function signals an error.

Source Code

;; Defined in /usr/src/emacs/lisp/net/eudc.el.gz
;; Emacs's `plist-get' lacks a default parameter, and CL-Lib's
;; `cl-getf' doesn't accept a predicate or signal an error.
(defun eudc-plist-get (plist prop &optional default)
  "Extract the value of PROP in property list PLIST.
PLIST is a list of the form (PROP1 VALUE1 PROP2 VALUE2...).
This function returns the first value corresponding to the given
PROP, or DEFAULT if PROP is not one of the properties in the
list.  The comparison with PROP is done using `eq'.  If PLIST is
not a valid property list, this function signals an error."
  (let ((tail (eudc--plist-member plist prop)))
    (if tail (cadr tail) default)))