(ldap-search-internal): Make the buffer unibyte.

Use buffer-string instead of buffer-substring for the whole buffer.

diff --git a/lisp/net/ldap.el b/lisp/net/ldap.el
index 4b16622d75108f71f5fecba2b55a37fe92a243ef..1724d9b1ea659532b3824be207016c67da57ce41 100644 (file)
--- a/lisp/net/ldap.el
+++ b/lisp/net/ldap.el
@@ -1,6 +1,6 @@
 ;;; ldap.el --- client interface to LDAP for Emacs
 
-;; Copyright (C) 1998, 1999, 2000 Free Software Foundation, Inc.
+;; Copyright (C) 1998, 1999, 2000, 2002 Free Software Foundation, Inc.
 
 ;; Author: Oscar Figueiredo <Oscar.Figueiredo@di.epfl.ch>
 ;; Maintainer: Oscar Figueiredo <Oscar.Figueiredo@di.epfl.ch>
@@ -583,9 +583,10 @@ an alist of attribute/value pairs."
            (save-excursion
              (set-buffer bufval)
              (erase-buffer)
+             (set-buffer-multibyte nil)
              (insert-file-contents-literally value)
              (delete-file value)
-             (setq value (buffer-substring (point-min) (point-max))))
+             (setq value (buffer-string)))
            (setq record (cons (list name value)
                               record))
            (forward-line 1))