projects
/
elisp
/
wanderlust.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
d7ffcab
)
* pldap.el (ldap-search-basic): Don't treat exit status 32 as an
author
teranisi
<teranisi>
Thu, 30 Jan 2003 04:15:34 +0000
(
04:15
+0000)
committer
teranisi
<teranisi>
Thu, 30 Jan 2003 04:15:34 +0000
(
04:15
+0000)
error [wl:11327].
elmo/ChangeLog
patch
|
blob
|
history
elmo/pldap.el
patch
|
blob
|
history
diff --git
a/elmo/ChangeLog
b/elmo/ChangeLog
index
0bae15f
..
9f0aed8
100644
(file)
--- a/
elmo/ChangeLog
+++ b/
elmo/ChangeLog
@@
-1,5
+1,8
@@
2003-01-30 Yuuichi Teranishi <teranisi@gohome.org>
2003-01-30 Yuuichi Teranishi <teranisi@gohome.org>
+ * 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.
* 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
(file)
--- 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'.
(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))
(error "LDAP error: \"No such object\""))
(goto-char (point-min))
(setq start (point))