From 9a3482500c7b54633c60d7c6261c21ad173e2ac2 Mon Sep 17 00:00:00 2001 From: teranisi Date: Thu, 30 Jan 2003 04:15:34 +0000 Subject: [PATCH] * pldap.el (ldap-search-basic): Don't treat exit status 32 as an error [wl:11327]. --- elmo/ChangeLog | 3 +++ elmo/pldap.el | 5 ++++- 2 files changed, 7 insertions(+), 1 deletion(-) diff --git a/elmo/ChangeLog b/elmo/ChangeLog index 0bae15f..9f0aed8 100644 --- a/elmo/ChangeLog +++ b/elmo/ChangeLog @@ -1,5 +1,8 @@ 2003-01-30 Yuuichi Teranishi + * pldap.el (ldap-search-basic): Don't treat exit status 32 as an + error [wl:11327]. + * elmo-imap4.el (elmo-folder-msgdb-create-plugged): Bind print-level, print-depth. diff --git a/elmo/pldap.el b/elmo/pldap.el index 5d90138..e8b944b 100644 --- a/elmo/pldap.el +++ b/elmo/pldap.el @@ -691,7 +691,10 @@ entry according to the value of WITHDN." (not (zerop ret)) ;; When openldap's `ldapsearch' exceeds response size limit, ;; it's exit status becomes `4'. - (/= ret 4)) + (/= ret 4) + ;; When openldap's `ldapsearch' uses referral, + ;; it's exit status becomes `32'. + (/= ret 32)) (error "LDAP error: \"No such object\"")) (goto-char (point-min)) (setq start (point)) -- 1.7.10.4