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

; * lisp/net/ldap.el (ldap-search-internal): Fix last change. (Bug#64089)

Browse source
This commit is contained in:
Eli Zaretskii 2023-06-17 10:59:44 +03:00
parent d2246b2627
commit 71b27779a9
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
lisp/net/ldap.el
View file

@ -710,7 +710,7 @@ an alist of attribute/value pairs."
;; otherwise `ldap-decode-attribute' would throw a much less ;; otherwise `ldap-decode-attribute' would throw a much less
;; comprehensible error later. ;; comprehensible error later.
(cond ((not withdn)) (cond ((not withdn))
((looking-at "^dn[=:\t ]+\\(.*\\)$") ((looking-at "dn[=:\t ]+\\(.*\\)$")
(setq dn (list "dn" (match-string 1)))) (setq dn (list "dn" (match-string 1))))
(t (error "Incorrect dn line \"%s\" in ldapsearch result" (t (error "Incorrect dn line \"%s\" in ldapsearch result"
(buffer-substring (point) (line-end-position))))) (buffer-substring (point) (line-end-position)))))