diff options
author | Filipp Gunbin <fgunbin@fastmail.fm> | 2022-10-25 17:59:33 +0300 |
---|---|---|
committer | Filipp Gunbin <fgunbin@fastmail.fm> | 2022-10-25 18:00:54 +0300 |
commit | 7e60246ab3cb7a3c40ca48d8ea9c107f00a6aea6 (patch) | |
tree | 7993b7b50a66e9b0bf13d1fc4b30178ed1c71ea2 /lisp/net | |
parent | c8fe6aae0ac352e48fff2bdec966a0605be63bac (diff) | |
download | emacs-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.el | 5 |
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")) |