Mercurial > emacs
changeset 59935:ccb26cb917af
(ldap-search-internal): Support attributes with
optional descriptions separated by a semi-colon, as in
"userCertificate;binary".
| author | Eli Zaretskii <eliz@gnu.org> |
|---|---|
| date | Sat, 05 Feb 2005 19:18:03 +0000 |
| parents | 462cd8b14e71 |
| children | 688b6f973ed9 |
| files | lisp/net/ldap.el |
| diffstat | 1 files changed, 2 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/net/ldap.el Sat Feb 05 18:12:32 2005 +0000 +++ b/lisp/net/ldap.el Sat Feb 05 19:18:03 2005 +0000 @@ -579,9 +579,9 @@ (end-of-line) (point)))) (forward-line 1) - (while (looking-at "^\\(\\w*\\)[=:\t ]+\\(<[\t ]*file://\\)?\\(.*\\)$") + (while (looking-at "^\\(\\w*\\)\\(;\\w*\\)?[=:\t ]+\\(<[\t ]*file://\\)?\\(.*\\)$") (setq name (match-string 1) - value (match-string 3)) + value (match-string 4)) ;; Need to handle file:///D:/... as generated by OpenLDAP ;; on DOS/Windows as local files. (if (and (memq system-type '(windows-nt ms-dos))