[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[PATCH] (ldap-search-internal): Ignore stderr from ldap-ldapsearch-prog
From: |
Eric Hanchrow |
Subject: |
[PATCH] (ldap-search-internal): Ignore stderr from ldap-ldapsearch-prog |
Date: |
Mon, 3 Jan 2011 18:50:38 -0800 |
lisp/net/ldap.el | 15 ++++++++-------
1 files changed, 8 insertions(+), 7 deletions(-)
diff --git a/lisp/net/ldap.el b/lisp/net/ldap.el
index 4676aba..8d77f34 100644
--- a/lisp/net/ldap.el
+++ b/lisp/net/ldap.el
@@ -555,13 +555,14 @@ an alist of attribute/value pairs."
(setq arglist (nconc arglist (list (format "-l%s" timelimit)))))
(if (and sizelimit
(not (equal "" sizelimit)))
- (setq arglist (nconc arglist (list (format "-z%s" sizelimit)))))
- (eval `(call-process ldap-ldapsearch-prog
- nil
- buf
- nil
- ,@arglist
- ,@ldap-ldapsearch-args
+ (setq arglist (nconc arglist (list (format "-z%s" sizelimit)))))
+ (eval `(call-process ldap-ldapsearch-prog
+ nil
+ ;; Ignore stderr, which can corrupt results
+ (list buf nil)
+ nil
+ ,@arglist
+ ,@ldap-ldapsearch-args
,@filter))
(insert "\n")
(goto-char (point-min))
--
1.7.3.2
- [PATCH] (ldap-search-internal): Ignore stderr from ldap-ldapsearch-prog,
Eric Hanchrow <=