# HG changeset patch
# User Chong Yidong <cyd@stupidchicken.com>
# Date 1294516142 18000
# Node ID 3a76bad4161461536b9dc2bd1bd4eb99f2dd8290
# Parent  fb129cb534767f5e1ca6012b6108b6217af906e4
* net/ldap.el (ldap-search-internal): Discard stderr output.

diff -r fb129cb53476 -r 3a76bad41614 lisp/ChangeLog
--- a/lisp/ChangeLog	Fri Jan 07 17:55:13 2011 +0200
+++ b/lisp/ChangeLog	Sat Jan 08 14:49:02 2011 -0500
@@ -1,3 +1,7 @@
+2011-01-08  Eric Hanchrow  <eric.hanchrow@gmail.com>
+
+	* net/ldap.el (ldap-search-internal): Discard stderr output.
+
 2011-01-07  Eli Zaretskii  <eliz@gnu.org>
 
 	* files.el (directory-abbrev-alist): Doc fix.  (Bug#7777)
diff -r fb129cb53476 -r 3a76bad41614 lisp/net/ldap.el
--- a/lisp/net/ldap.el	Fri Jan 07 17:55:13 2011 +0200
+++ b/lisp/net/ldap.el	Sat Jan 08 14:49:02 2011 -0500
@@ -558,7 +558,8 @@
 	  (setq arglist (nconc arglist (list (format "-z%s" sizelimit)))))
       (eval `(call-process ldap-ldapsearch-prog
 			   nil
-			   buf
+			   ;; Ignore stderr, which can corrupt results
+			   (list buf nil)
 			   nil
 			   ,@arglist
 			   ,@ldap-ldapsearch-args