Function: eudc-get-email
eudc-get-email is an autoloaded, interactive and byte-compiled
function defined in eudc.el.gz.
Signature
(eudc-get-email NAME &optional ERROR)
Documentation
Get the email field of NAME from the directory server.
If ERROR is non-nil, report an error if there is none.
Key Bindings
Source Code
;; Defined in /usr/src/emacs/lisp/net/eudc.el.gz
;;;###autoload
(defun eudc-get-email (name &optional error)
"Get the email field of NAME from the directory server.
If ERROR is non-nil, report an error if there is none."
(interactive "sName: \np")
(or eudc-server
(call-interactively 'eudc-set-server))
(let ((result (eudc-query (list (cons 'name name)) '(email)))
email)
(if (null (cdr result))
(setq email (cdaar result))
(error "Multiple match--use the query form"))
(if error
(if email
(message "%s" email)
(error "No record matching %s" name)))
email))