procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Move required options out of ldap-ldapsearch-args

Browse source 
* 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.
This commit is contained in:
Filipp Gunbin 2022-10-25 17:59:33 +03:00
parent c8fe6aae0a
commit 7e60246ab3
1 changed files with 3 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
lisp/net/ldap.el
View file

@ -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"))