Function: eudc-ldap-check-base

eudc-ldap-check-base is a byte-compiled function defined in eudcb-ldap.el.gz.

Signature

(eudc-ldap-check-base)

Documentation

Check if the current LDAP server has a configured search base.

Source Code

;; Defined in /usr/src/emacs/lisp/net/eudcb-ldap.el.gz
(defun eudc-ldap-check-base ()
  "Check if the current LDAP server has a configured search base."
  (unless (or (ldap-get-host-parameter eudc-server 'base)
	      ldap-default-base
              (null (y-or-n-p "No search base defined.  Configure it now?")))
    ;; If the server is not in ldap-host-parameters-alist we add it for the
    ;; user
    (if (null (assoc eudc-server ldap-host-parameters-alist))
	(setq ldap-host-parameters-alist
	      (cons (list eudc-server) ldap-host-parameters-alist)))
    (customize-variable 'ldap-host-parameters-alist)))