summaryrefslogtreecommitdiff
path: root/lisp/net
diff options
context:
space:
mode:
authorFilipp Gunbin <fgunbin@fastmail.fm>2022-10-25 17:59:33 +0300
committerFilipp Gunbin <fgunbin@fastmail.fm>2022-10-25 18:00:54 +0300
commit7e60246ab3cb7a3c40ca48d8ea9c107f00a6aea6 (patch)
tree7993b7b50a66e9b0bf13d1fc4b30178ed1c71ea2 /lisp/net
parentc8fe6aae0ac352e48fff2bdec966a0605be63bac (diff)
downloademacs-7e60246ab3cb7a3c40ca48d8ea9c107f00a6aea6.tar.gz
emacs-7e60246ab3cb7a3c40ca48d8ea9c107f00a6aea6.tar.bz2
emacs-7e60246ab3cb7a3c40ca48d8ea9c107f00a6aea6.zip
Move required options out of ldap-ldapsearch-args
* lisp/net/ldap.el (ldap-ldapsearch-args, ldap-search-internal): Move "-LLL" and "-tt" options as they're required for the code to work properly.
Diffstat (limited to 'lisp/net')
-rw-r--r--lisp/net/ldap.el5
1 files changed, 3 insertions, 2 deletions
diff --git a/lisp/net/ldap.el b/lisp/net/ldap.el
index ccad8c4edb1..de553468b1c 100644
--- a/lisp/net/ldap.el
+++ b/lisp/net/ldap.el
@@ -156,7 +156,7 @@ Valid properties include:
"The name of the ldapsearch command line program."
:type '(string :tag "`ldapsearch' Program"))
-(defcustom ldap-ldapsearch-args '("-LLL" "-tt")
+(defcustom ldap-ldapsearch-args nil
"A list of additional arguments to pass to `ldapsearch'."
:type '(repeat :tag "`ldapsearch' Arguments"
(string :tag "Argument")))
@@ -609,7 +609,8 @@ an alist of attribute/value pairs."
(sizelimit (plist-get search-plist 'sizelimit))
(withdn (plist-get search-plist 'withdn))
(numres 0)
- arglist dn name value record result)
+ (arglist (list "-LLL" "-tt"))
+ dn name value record result)
(if (or (null filter)
(equal "" filter))
(error "No search filter"))