summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--lisp/ChangeLog3
-rw-r--r--lisp/net/ldap.el4
2 files changed, 7 insertions, 0 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 59922f2e2dc..3e0308bcd9c 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,8 @@
2002-05-12 Pavel Jan,Bm(Bk <Pavel@Janik.cz>
+ * net/ldap.el (ldap-search-internal): Unfold folded lines before
+ parsing.
+
* cus-edit.el (customize-set-value): Rename `var' to `variable'
and `val' to `value'.
(customize-save-variable): Rename `var' to `'variable.
diff --git a/lisp/net/ldap.el b/lisp/net/ldap.el
index 03923eb4114..d539164e9f9 100644
--- a/lisp/net/ldap.el
+++ b/lisp/net/ldap.el
@@ -562,6 +562,10 @@ an alist of attribute/value pairs."
(insert "\n")
(goto-char (point-min))
+ (while (re-search-forward "[\t\n\f]+ " nil t)
+ (replace-match "" nil nil))
+ (goto-char (point-min))
+
(if (looking-at "usage")
(error "Incorrect ldapsearch invocation")
(message "Parsing results... ")